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1. 프로그람작성방범 

병렬가상기계체계룔 러용하는 병렬웅용프로그람을 개발하자면 적어도 
다중처리기에서와 분산기억형다중처리기에서외 병렬프로그람작성방범을 알아 
야 한다. 

기본적인 수범들은 알고리돔개발이나 프로그람외 론러적인 개념에서 직렬 
프로그람작성 방범 과 류사하다. 

그러나 

1. 과제관리 측면에서 특히 동적 인 프로께스 생성, 이 름달기, 주소화방범 

2. 실제 적 인 계 산단계 전 에 진 행 하는 초기 화단계 

3. 럽도외 선택 

4. 이 종성 

측면에서 특징적 인 차이점들이 존재한다. 

여기서는 병렬가상기계에서외 병렬프로그람작성방범에 대하여 서술하고 
기눙파 성능에 영 향을 줄수 있는 인자들에 대하여 설명 한다. 

1.1 일반적인 병렬프로그람작성모형 

병 렬 가상기 계 체 계 룔 리 용한 병 렬 계 산을 위 한 계 산모형 은 계 산과제 들외 선 정 
및 분할방식 에 기 초하여 3가지 방식 으로 진행한다. 

© 가장 공통적 이 고도 중요한 병 렬 가상기 계 체 계 외 계 산모형 은 "무리 계 산" 
모형 이 다. 

이 모형 에서는 전형적으로 메 파제들이 서로 밀접히 결합되 여있다. 

메 과제들은 같은 코드를 실행하고 서로 다른 자료부분을 처리하며 보통 
중간결과들을 주기 적 으로 교환한다. 

이 모형 은 두가지 부류로 나눌수 있다. 

- 주-종속모형 

이 모형에서 주프로그람이라고 부르는 조종프로그람은 프로께스외 실행, 
초기화, 결과외 접 합 등외 기눙을 수행한다. 



종속프로그람은 실제적 인 계산부분을 처리한다. 그것들은 주프로그람 
으로부러 작업부하룔 배정받거나(정적으로 흑은 동적으로)자기에게 분배된 
부분을 처 리 한다. 

-마디전용모형 

여기서는 한개외 프로그람이 여러개외 실체로 실행된다. 한개외 
프로그람은(이것은 대체로 수동적으로 초기화된다.) 계산부분과 함께 
비 계 산웅답기 눙도 가지 고있 다. 

© 병 렬가상기계 에서 제공하는 두번째 모형 은 "나무형 " 계산모형 이 다. 

이 알고리돔에서 프로께스들은(보통 계산과정 에 동적으로 진행된다.) 나무와 
류사한 방식으로 실행되므로 나무와 같은 어미-자식관계를 가진다(별형구조와 
류사한 흔합형 계 산모형 과는 반대 이 다.). 

이 모형은 잘 리용되지는 않지만 진체 작업부하가 사전에 잘 알러지지 않은 
경우, 실례로 가지한정알고리둠, 재귀적인 "점유 및 포획" 알고리둠과 같은 
웅용들에서 대단히 유익하다. 

@ 세 번째모형 은 ** 혼합형 " 모형 이 라고 부른다. 

이것은 "나무" 모형과 "무리계산" 모형외 조합으로 볼수 있다. 

이 모형은 임외외 시동구조를 가지고있다. 죽 웅용프로그람실행외 임외외 
시점에서 프로께스관련구조는 임외로 될수 있으며 그라프는 변경된다. 

우리는 이 세가지 정식화들이 비록 통신위상에 따라 변할수는 있다 해도 
프로께스관계외 기초로 된다는것을 강조한다. 

그럼에도 불구하고 이 세가지 전략들에서 임외외 프로께스들은 다른 
프로께 스들과 통신 및 동기 화를 진행 할수 있다. 

또한 모형외 선택은 웅용프로그람에 외존하며 병렬화헤야 할 때 프로그람외 
구조에 가장 알맞는것을 선택헤야 한다. 

1.1.1 무리형 계산모형 

무리 계 산모형 은 일 반적 으로 세 단계 로 구성 된다. 첫 단계 는 프로께 스그물외 
초기 화단계 이 다. 마디 전용계산인 경우 이 단계 에서는 작업 부하분배와 마찬가지 
로 그물정 보와 파라메 터 들을 준다. 



두번째 단계는 계산단계이다. 세번째 단계는 결파외 모으기와 출구단계 이다. 
이 단계에서 프로께스그물은 해체되며 완료된다. 잘 알러진 만멸브로트 


( Mandelbrote ) 모임계산을 실례로 주-종속모형을 아래에서 설명한다. 

이 문제는 병렬화가 대단히 힘든 분야외 문제이다. 계산 그 자체는 함수값이 
지정된 값에 도달하였거나 발산하기 시작할 때까지 복소수평면에 있는 점들에 
재귀함수를 적용한다. 이 조건에 따라 평면에 있는 메 점이 그라프적으로 
표시된다. 

함수결파는 점 (다른 점 들과는 득럽이 다.)외 초기 값에 외 존하므로 문제 를 
완전히 득럽적인 부분들로 가룔수 있으며 메개 부분에 알고리둠을 적용하고 
계산결과들을 단순한 합성기범을 러용하여 묶을수 있다. 

그러나 이 수범은 동적인 부하균등을 허용하기때문에 처리기들은 균등한 
작업부하를 가질수 있다. 웅용프로그람외 주-종속구조룔 그림 1에 보여준다. 

만델 브로트계 산알고리 돔 

{초기 배치} 

for i 0 to NumWorkers - 1 

pvm _ spawn(<worker name >) {작업 기 i 를 시 동} 

pvm _ send(<worker tid >, 999) {작업기 i 에 과제룔 보낸다.} 

endfor 

{수신-송신} 

while ( WorkToDo ) 

pvm _ recv (888) {결과접수} 

pvm _ send(<available worker tid >, 999) 

{다옴 과제 룔 가눙한 처 러 기 에 보낸 다. 

결파 현시} 
endwhile 
{결과 모으기} 

for i 0 to NumWorkers - 1 
pvm _ recv (888) {결과접수} 



pvm _ kill(<worker tid i >) {작업 기 i 를 완료} 

display result 

endfor 


{처리기들에서외 계산} 


while ( true ) 

pvm _ recv (999) {과제접수} 

result ：= MandelbrotCalculations ( task ) {결과계산} 
pvm _ send (< tid >, 888) {결과를 주처리기에게 보낸다.} 
endwhile 



Slave 


그림 1 주/종속모형 

우에서 서술된 주-종속 실례는 증속파제들사이외 통신은 고러하지 않았다. 
대다수외 무리 계산모형들에서는 계산과제들사이 에 통신을 요구한다. 

우리는 캐논외 알고리둠을 러용한 행렬급하기실례를 가지고 그러한 웅용들외 
구조를 설명한다(류사한 알고리둠에 대해서는 다옴 장에서 구체적으로 
서 술한다.). 



그림 2외 행렬급하기실례에서는 행렬외 부분볼로크들을 국부적으로 급하고 
행렬 B 외 부분볼로크들을 렬방향으로 밀고 그 다옴에 행렬 A 외 부분볼로크들을 
행방향으로 방송한다. 

{행렬급하기 알고러둠} 

{처 리 기 0은 다른 프로께 스들을 시 동한다.} 
if (<my processor number > = 0) then 

for i *= 1 to MeshDimension^MeshDimension 
pvm _ spawn(<component name >, . .) 
endfor 
endif 

forall processors Pij , 0 <= i , j < MeshDimension 
for k 0 to MeshDimension -1 

if myrow = ( mycolumn + k ) mod MeshDimension 
{Send A to all Pxy , x = myrow , y <> mycolumn } 
pvm _ mcast (( Pxy , x = myrow , y <> mycolumn ), 999) 
else 

pvm _ recv (999) {Receive A } 
endif 

{ Multiply . Running totals maintained in C .} 

MultiplyCA , B , C ) 

{ Roll } 

{Send B to Pxy , x = myrow -1, y = mycolumn } 
pvm _ send (( Pxy , x = myrow -1, y = mycolumn ), 888) 
pvm _ recv (888) {Receive B } 
endfor 


endfor 



First 4 Steps of Pipe-Nlultiply-RoU on a 3x3 Mesh-Connected Machine 



Step •♦: Second 타 pipo" 

그림 2 일반적 인 무리계산 


1.1.2 나무형 계산모형 

앞에서 서술한바와 같이 나무형계산들은 전형적으로 나무와 류사한 
프로께 스구조룔 가지 고있으며 또한 많은 실체들에 서 통신류형 들을 확정 한다. 

이 모형을 설명하기 위하여 우리는 다옴과 같은 병렬분류알고러둠을 
고찰한다. 분류해 야 할 목록은 한 프로께 스가 가지 고있다. 이 프로께스는 두번째 
프로께스를 생성하며 목록외 절반을 그 프로께스에 보낸다. 

이 시점에서 메개 프로께스는 각각 한개외 자식프로께스룔 생성하고 이미 
절반으로 나누어진 목록외 절반을 그것들에 보낸다. 이 과정은 적절한 깊이외 
나무가 구성 될 때 까지 계 속된다. 

메개 프로께스는 목록에서 자기에게 해당한 부분을 득럽적으로 분류한다. 
메개 마디에서 중간병합과정들이 이루어지고 다옴에 나무외 변들을 따라 우로 
울라가면서 병합과정이 이루어진다. 이 알고러둠은 나무계산에 대하여 
구체 적 으로 설 명 한다. 작업 부하는 실 행 과정 에 알러 진 다. 프로께 스를 묘사하는 
과정을 그림 3에 보여주었다. 

알고리 둠은 다옴과 같다. 







{ 방송형 나무류형 에 기 초한 목록외 생성 및 나누기 } 
for i *= 1 to N , such that 2 ^N = NumProcs 
forall processors P such that P < 2 ^i 
pvm _ spawn (...) {process id P XOR 2 아} 
if P < 2^( i - l ) then 

midpt ： = PartitionList ( list )； 

{목록 [ a . midpt ] 을 P XOR 2^ 에 보낸다.} 
pvm _ send((P XOR 2^ i ), 999) 
list ：= list [ midpt + L . MAXSIZE ] 
else 

pvm _ recv (999) {목록접수} 
endif 
endfor 
endfor 


{ 나더지 목록외 분류 } 

QuicksortQist [ midpt + L . MAXSIZE ]) 

{ 분류된 부분목록들을 모으기 및 병 합한다. } 
for i ：= N downto 1, such that 2 ^N = NumProcs 
forall processors P such that P < 2 ^i 
if P > 2^( i - l ) then 
pvm _ send((P XOR 2^ i ), 888) 

{Send list to P XOR 2 아} 
else 

pvm _ recv (888) {receive temp list } 
merge templist into list 
endif 
endfor 


endfor 




그림 3 나무형 계산실례 

1.2 작업부하외 분배 

앞절에서는 프로께스구조에 따르는 공통적인 병렬프로그람작성모형에 
대하여 서술하고 병렬가상기계체계외 측면에서 직관적인 실례를 가지고 
설명 하였다. 

이 절에서는 작업부하분배문제룔 취급하고 프로께스구조를 확정하며 
분산기 억 형 콤퓨터 체 계 에 서 외 병 렬계 산에 서 리 용되 는 몇 가지 공통적 인 모형 들에 
대하여 설명한다. 

첫째: 자료분배와 나누기라는것은 모든 문제가 한개이상외 자료구조우에서 
계산과 통신을 가지고있으며 또 이 자료구조들은 그 우에서 나누어 
지 고 계 산된 다는것 을 외 미 한다. 

둘째: 기눙분할이라는것은 계산과제를 서로 다른 기눙이나 함수들로 나눈다 
는것 을 외 미 한다. 

기농적으로 병렬가상기계계산모형은 기눙분할(기눙적으로 서로 다른 과제 
들은 서로 다른 연산들을 수행한다.)파 자료분할(동등한 과제들이 자료외 서로 
다른 부분을 처 리 한다.)을 둘다 지원하고있다. 



1.2.1 자료분할 

자료분할외 단순한 실례로서 두개외 벡토르 A [1.. N ] 와 B [1.. N ] 외 더하기를 
고찰하자. 결 과는 C [1.. N ] 에 보관한다. 

우리는 이 문제룔 푸는데 P 개외 프로께스들이 있으며 메 프로께스들에 
N / P 개외 자료요소들이 분배되며 결파벡토르들도 N / P 개외 요소들로 계산된다고 
가정 한다. 

이 자료분할은 정적으로 할수도 있고(여기서 메개 프로께스는 N 과 P 외 값을 
가지고 사진에 자기가 처리헤야 할 작업량을 알고있다.) 흑은 동적으로 할수도 
있 다. 

동적자료분할외 경우 조종프로께스(실례로 주프로께스)는 프로께스들이 
연산을 끝날 때마다 작업부하들을 분배한다. 

이 두가지 방안들외 원리적인 차이는 계획화에 있다. 정적인 계획화에서는 
메개 프로께 스들외 작업 부하가 고정되 여있고 동적 인 계획화에서 는 프로께 스 
들외 작업부하가 시간에 따라 변한다. 

대다수외 다중처리기환경에서는 벡토르더하기실례에서와 같은 문제들에 
대해서 정적인 계획화가 더 i 과적이다. 그러나 일반적으로 병렬가상기계환경 
에서는 정적계획화가 항상 i 파적인것은 아니다. 그 러유는 콤퓨터들을 망으로 
련결한 국부망에서외 병 렬가상기계환경 이 외부환경외 영 향을 많이 받기때문 
이다. 

그러 므로 정 적 으로 계획화되 고 자료가 분할된 문제는 한개 이상외 프로께스 
들로 실행할수 있는데 다른 계획화방범들보다 더 빨리 흑은 더 천천히 실행될수 
있 다. 

이런 경우는 병렬가상기계체계에 있는 처리기들이 이종성을 가질 때, 죽 
CPU 속도가 다르고 기 억기용량이 차이나며 체계외 속성 이 다른 경우에도 
일 어 날수 있 다. 지 어 작은 벡 토르더 하기 문제 룔 실 행 할 때 에 조차 무시 할수 없는 
문제 는 입 구와 출구이 다. 

다시말하여 우에서 서술한 프로께스들이 자기외 작업부하를 어떻게 접수하며 
그것들이 결과벡토르룔 가지고 무엇을 하는가 하는 질문에 대한 대답은 
웅용프로그람과 구체적 인 실행환경 에 따라 달라진다. 



그러 나 일반적 으로 

1) 개별적인 프로께스들은 자기 자체외 자료룔 란수를 러용하든가 정적으로 
알러진 값들을 리용하여 내부적으로 생성한다. 이것은 다만 특별한 
경우에 흑은 프로그람검사목적을 위해서만 가눙하다. 

2) 개별적인 프로께스들은 외부장치로부러 자기외 자료들을 득럽적으로 
입력한다. 이 방범은 대다수외 경우에 외미가 있지만 이것은 병렬 
입 출구가 제 공될 때 만 가눙하다. 

3) 조종프로께스는 개별적인 자료부분모임들을 메 프로께스에 보낸다. 
이 것 은 특히 병 렬 입 출구기 눙을 지 원하지 않는 경 우에 특별 히 효과적 이 다. 
이 방범은 또한 입구자료부분모임들이 같은 웅용프로그람내에서 이전외 
계산결과로부터 나오는 경우에 편리하다. 

개별적으로 작업부하를 분배하는 세번째 방범은 계산과정에 호상작용이 
거 외 없거 나 존재하지 않는 웅용들을 동적 으로 계획 화하는 경우에도 부합된다. 

그러나 일반적으로 알고리돔들에서는 자료외 중간결과들을 교환하므로 이 
수범들에 외헤서는 다만 자료외 초기분배만이 실현된다. 실례로 그림 2에서 
서 술된 자료분할방범 을 고찰하자. 

두 행렬 A 와 B 룔 급하기 위하여 주-종속 흑은 마디진용모형을 러용하여 
프로께 스들외 그물을 먼 저 생 성 한다. 

이 프로께스들외 모임은 그물을 형성하며 급헤야 할 행렬들도 그물을 형성 
하면서 부분볼로크들로 나누어 진다. 

행렬 A 와 B 외 부분볼로크들은 우에서 서술한 자료분배와 작업부하분배전략 
들중 하나룔 리용하여 대웅하는 프로께스에 배치된다. 

계 산도중에 부분볼로크들은 프로께스들사이 에 서 교환되 여 야 하므로 그림 
에서 보여준바와 같이 원태외 분배표를 보낸다. 

그러나 계산외 마감에 행렬부분볼로크들은 개별적인 프로께스들에 위치 
하고있으며 프로께스그물과 결과행렬 C 외 대웅하는 위치에 있다. 



1.2.2 기농분할 

병렬가상기계외 병렬실행환경에서는 전체 작업부하룔 연산단위로 나 누어 
실현할수도 있다. 이러한 형태외 분할에 대한 가장 명백한 실례는 전형적인 
프로그람실행외 세가지 단계 죽 입구, 처리, 결과출구와 관련된다. 

기눙분할에서 그러한 웅용은 세개외 개별적이며 명백한 프로그람들로 구성 
되며 메개는 세 단계들중외 하나로 된다. 병렬성은 세개외 프로그람들을 동시에 
실행시 키 고 그것들사이 에 관흐롬을 실현하므로써 얻어 진다. 

그러 나 그러한 모형 에서도 메 단계 에 자료병 렬성 이 존재한다. 기눙분할외 
개념 은 우에서 서 술한 실례 로 례증할수 있다. 

그러나 일반적으로 이 외미는 기눙별로 작업부하를 분배하거나 분할 
한다는것 을 표시 하는데 리 용한다. 

일반적으로 웅용프로그람들은 여러가지 서로 다른 알고리둠들을 포함하며 
때로는 같은 자료 ( MPSD-Multiple Program Single Data ) 에서 때로는 련속 
자료전송형 태 로, 때 로는 비 구조적 인 통신 형 태 로 존재 할수 있다. 

우리는 다중으로 호상련걸되 고 호상작용하는, 기눙적 으로는 분할된 비 행기외 
가상모외를 통하여 일반적인 기눙분할모임을 설명한다. 이 실례에 대한 도식을 
그림 4에 보여준다. 

그림에서 그라프에 있는 메개 마디 흑은 원은 기눙적으로 분할된 웅용프로 
그람외 토막을 보여준다. 입구함수들은 다른 함수들인 2~6에 개별적인 
문제파라메터 들을 분배 하며 메 부분알고리둠들을 수행 하는 프로그람들에 대 웅 
하는 프로께 스들을 생 성 한다. 

여러 함수들에 같은 자료가 전송될수 있으며(실례로 두개외 날개함수인 
경우에)주어진 함수자체에 필요한 자료가 전송될수도 있다. 계산을 진행한 후에 
이 함수들은 계산외 시작시점에서 흑은 결과가 필요하여 생성된 함수 7, 8, 9에 
중간결과 흑은 최 종결과룔 보낸다. 이 모형 은 자료 및 조종외존성과 마찬가지 로 
기눙에 따라 웅용프로그람을 분할하는 개념을 서술하고있다. 
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그림 4 기눙분할실례 

병렬성은 함수 2~6에서와 같이 모듈들을 병렬로, 득럽적으로 실행시키거나 
외존성서술에 따라 죽 함수 1, 6, 8, 9순서로 모듈들을 실행시키는 방범으로 
두가지 측면에서 실현될수 있다. 

1.3 현존 옹용프로그람들을 병렬가상기계에 이식 

병렬가상기계체계룔 러용하자면 웅용프로그람들을 두 단계로 개발하여야 
한다. 

던저 웅용프로그람외 알고리둠을 분산기억형병렬프로그람형식으로 개발 
하여 야 한다. 이 단계는 다른 분산기 억다중처리기 에서와 마찬가지로 병렬가상 
기 계 체 계 에 서 도 필 요하다. 실 제 적 인 병 렬 화결 심 들은 다옴외 두 단계 로 귀 착된 다. 
죽 구조와 관련된것 과 효과성 과 관련된것 이 다. 웅용프로그람병 렬화에 서 구조 
적인 결심을 하는데서 중요한것은 리용하여야 할 모형을 선택하는것이다(죽 
무리계산 대 나무형계산과 자료분할 대 기눙분할). 분산기 억환경 에서 병 렬화룔 
진행할 때 효과성과 관련되는것은 일반적으로 통신외 량과 빈도수를 최소로 
하는것 이 다. 병 렬가상기 계환경 은 망에 기 초하고있으므로 일반적 으로 럽 도를 
크게 하는것이 효과적이다. 이런 측면에서 프로그람외 병렬화는 



병 렬 가상기 계 에 서 나 하드웨 어 다중처 리 기 들을 포함한 다른 분산기 억 환경 에 서 
아주 류사하다. 

다옴으로 현재외 직 렬 프로그람이 나 병 렬 프로그람을 처 음부터 병 렬화할수 
있 다. 

우외 두 경우에는 던저 이미 서 술된것으로부러 흑은 적절한 병 렬알고러둠을 
개발하고 그 다옴 적당한 프로그람작성언어로 이 알고러둠을 코드화한다. 

현존 병렬프로그람들을 병렬화하는것은 일반적인 원칙에 따라 진행하는데 
먼 저 순환들로 분헤 하고 제 일 바깥순환부터 시 작하여 실 행하는것 이 다. 이 
처리에서 중요한것은 외존성들을 검출하고 외존성이 보존되도록 하면서 
순환들을 분헤 하는것 이 다. 이 병 렬화원리 는 많은 책 들과 론문들에 서 서 술되 였다. 

그러나 순차프로그람을 병렬프로그람으로 넘기는 실천적이고도 득특한 
방범 들을 서 술한 책 은 거 외 없 다. 

현존 병 렬프로그람들은 공유기 억 흑은 분산기 억 모형 에 기 초하고있다. 

현존 공유기억형 프로그람들을 병렬가상기계에 넘기는것은 직렬코드룔 
변환하는것 과 아주 류사하다. 

그것 은 공유기 억 형 프로그람들이 벡 토르 흑은 고리 준위 병 렬화에 기 초하고있 
기때문이다. 공유기억과제인 경우에 처옴으로 해야 할 처리는 동기화시점들을 
찾고 이 것 들을 통보전 달기 눙으로 바꾸는것 이 다. 

현존 분산기억형프로그람을 병렬가상기계로 넘기기 위해서는 먼저 한가지 
병 행 성 구조모임 을 다른 모임 으로 변환한다. 

일반적 으로 현존 분산기 억 병 렬프로그람들은 p 4 나 Express 와 같은 하드웨 어 
다중처리기나 다른 망환경을 위하여 작성되 여있다. 두 경우에 프로께스관리와 
관련하여 수정하여 야 할 중요한 문제가 있다. 

실례로 인텔계 렬처 리 기들에서는 호상작용하는 셀지 령들을 리 용하여 프로 
께스들을 시동시키는것이 보통이다. 

병렬가상기계에서는 그러한 모형을 프로께스룔 생성하는 눙력을 가진 주 
프로그람 흑은 마디 프로그람으로 바끝수 있다. 

호상작용측면에서 고러하여야 할 공통적인 문제는 여러가지 프로그람 
작성 환경 에서외 통보전 달호출문제 이 다. 

이 러 한 문맥 에 서 병 렬 가상기 계 와 다른 체 계 들과외 기 본 차이 점 은 



1) 프로께 스관러 와 프로께 스취 급방범 

2) 가상기계외 구성과 재구성, 병렬웅용프로그람실행에서 그외 영향 

3) 서로 다른 구성과 자료표현수범을 취급하는데로부터 생기는 통보외 이종성 

4) 신 호기 수범 과 과제 계 획 화방범 과 같은 고유한 특징 

2. 병렬가상기계외 러용자대면부 

이 장에서는 병렬가상기계외 함수들에 대하여 간단히 설명한다. 실례로 
통보전달에 대한 절에서는 한 병렬가상기계과제로부러 다른 과제에로 자료들을 
주고받는 모든 함수들을 설명 하며 또한 병 렬가상기 계 외 통보전 달추가선 택 들에 
대하여 설명한다. 

메개 함수에서는 또한 C 와 포토란 사용실례들을 주었다. 

병렬가상기계에서 모든 병렬가상기계과제들은 국부 pvmd 가 제공하는 
옹근수식별자로써 식 별된다. 

다옴에서 이러한 과제식별자를 TID 라고 부른다. 이것은 Unix 체계에서 
리용되는 프로께스번호와 같으며 TID 외 값이 리용자에게 특별한 외미를 가지지 
않으므로 리 용자에게는 불투명하다. 

사실상 병 렬가상기 계는 그 자체외 내부사용을 외 해 정 보룔 TID 로 해 신한다. 
모든 병렬가상기계함수들은 C 언어로 작성하였다. C ++ 언어로 작성된 프로그람 
들도 병 렬 가상기 계 서 고에 련 결 할수 있 다. 

포트란웅용프로그람들은 병 렬가상기 계 체계 가 지 원하고있는 포트란77 
대면부룔 통하여 이 함수들을 호출할수 있다. 이 대면부는 변수들을 번역하며 이 
변수들은 포트란서 술로 넘 긴다. 

이 대 면부는 또한 포트란문자렬표기 와 여 러 가지 이 롬달기약속들을 고러 하여 
여러가지 포트란콤파일러들이 C 함수들을 호출할수 있게 한다. 

병렬가상기계통신모형에서는 임외외 파제가 다른 병렬가상기계과제에 
통보를 보낼수 있으며 그러한 통보들외 크기나 개수에는 제한이 없다고 
가정 한다. 



모든 처리기들은 완충기억을 제한하는 물러적인 기억한계룔 가지고 
있기때문에 통신모멸은 그 자체가 개별적인 처리기들외 제한성을 고러하지 
않으며 층분한 기 억 기 가 있다고 가정 한다. 

병 렬 가상기 계 통신 모멸 은 비 동기 적 인 봉쇄 전송, 동기 적 인 봉쇄 수신, 
비봉쇄수신기 눙들을 제 공하고있다. 여 기서 봉쇄송신 이 라는것은 송신완충기 가 
비여 다시 사용하게 될 때마다 되돌린다는것이다. 비봉쇄전송은 송신이 
귀 환하기 전 에 수신자가 자기 에 게 오는 정 보를 받을것 을 요구하지 않는다. 

병렬가상기계에는 과제로부러 과제에로 자료를 직접 진송할것을 요구하는 
추가선택들이 있다. 이 경우에 만일 통보가 크다면 송신자는 수신자가 일치한 
수신을 받을 때까지 봉쇄될수도 있다. 

비봉쇄수신은 자료가 도착하지 않아도 죽시 귀환되지만 봉쇄수신은 자료가 
수신완충기 에 들어 왔을 때 만 귀 환된다. 

이러한 점대점통신에 보층적으로 이 통신모멸에서는 어떤 파제모임에로외 
다중통신파 리 용자가 정외 한 파제그물에로외 방송통신을 지원하고있다. 

또한 리용자가 정외한 과제들사이에서 대역적인 최대값구하기, 대역적인 
더하기 등을 수행하는 여러가지 기눙들을 가지고있다. 병렬가상기계모멸은 
통보외 순서 가 보존된다는것 을 담보한다. 

만일 파제 1이 과제 2에게 통보 A 를 보내고 다옴에 파제 1이 과제 2에 통보 
B 를 보낸다면 통보 A 는 통보 B 전에 도착한다. 또 과제 2가 접수하기전에 두 
통보들이 도착한다면 항상 통보 A 가 던저 처 리된다. 

통보완충기들은 동적으로 할당한다. 그러므로 송신하거나 수신할수 있는 
최 대 통보크기 는 주어 진 처 리 기 에서 리 용할수 있는 기 억 기 외 크기 에 외 존한다. 

병렬가상기계체계에는 유일하게 구축된 한정된 흐롬조종이 있다. 병렬 
가상기계는 오는 통보들외 진체 크기가 리용가눙한 기억기량을 초과하는 경우 
필요한 기억기를 얻을수 없다는 오유룔 내보내지만 병렬가상기계는 다른 
파제들이 이 처리기에 전송을 중지하라고는 통보하지 않는다. 

2.1 프로께스조종 

int tid = pvm _ mytid ( void ) 
call pvmfmytkK tid ) 



pvm_rnytidO 함수는 이 프로께스외 TID 를 돌러주며 여러번 호출할수 있다. 
만일 이것 이 첫 호출이라면 그것을 병 렬가상기계 에 기록한다. 임외외 
병렬가상기계체계호출은 만일 그 과제가 호출전에 체계에 기록되지 않았다면 
파제 를 체 계 에 기 록한다. 

그러나 체계에 파제룔 기록하기 위하여 pvm_mytidO 함수룔 던저 호출 
하는것이 일반적이다. 

int info = pvm_exit( void ) 
call pvmfexitC info ) 

pvm_exit() 함수는 국부 pvmd 에게 이 프로께스가 체계룔 떠난다는것을 
알러준다. 이 함수는 프로께스룔 죽이지 않으며 다른 Unix 프로께스들과 같이 
파제 들을 계 속 실 행 한다. 

일반적으로 리용자들은 자기외 C 프로그람을 끝내기전에 흑은 포트란 
프로그람에 서 STOP 지 령 전 에 pvm_exitO 함수를 리 용한다. 

int numt = pvm_spawn( char *task, char **argv, int 
flag, char *where, int ntask, int *tids ) 
call pvmfspawnC task, flag, where, ntask, tids, numt ) 

pvrn_spawnO 함수는 가상기 계 에 서 병 렬 가상기 계 웅용프로그람들을 생 성 하 
는데 리용된다. argv 는 NULL 로 끝나는 과제변수들외 배렬에 대한 지적자이다. 
파제가 변수들을 가지지 않는다면 argv 는 NULL 로 된 다. flag 변수는 주가선택 
들을 지 적 하는데 리 용되 는데 그외 외 미 는 다옴과 같다. 

값 추가선택 외미 

0 PvmTaskDefault 프로께스들을 어디서 실행시키겠는가를 결정한다. 

1 PvmTaskHost where 변수는 실행할 처 리기 에 고유한 값이다. 

2 PvmTaskArch where 변 수는 실 행 할 처 리 기 외 PVM_ARCH 이 다. 

4 PvmTaskDebug 과제들을 오유제거기우에서 실행시킨다. 



8 PvmTaskTrace 추적자료를 생성한다. 

16 PvmMppFront 파제 들을 MPP 외 앞단마디 에 서 실 행 시 킨 다. 

32 PvmHostCompl where 에 있는 처 리기 모임을 보충한다. 

이 이름들은 pvm / include / pvm.h 에 미리 정해져있다. 포트란에서는 모든 
이름들이 파라메터지 령들로 미 리 정외되 여있으며 이것은 pvm / include / fpvm.h 
파일에서 찾을수 있다. 

PvmTaskTrace 는 PVM 3 외 새로운 특징이다. 이 추가선택을 설정 하여 
생성된 파제들에 대한 추적사건들을 생성한다. 다른 경우 pvrn_setoptO 함수로 
추적사건들을 어디로 보내야 하는가룰 지적헤야 한다. 함수가 귀환되였을 때 
numt 에는 실제로 생성된 과제들외 개수 흑은 오유가 발생한 경우 오유코드가 
들어 있다. 

만일 과제들이 생성되였다면 pvm _ spa\vnO 함수는 생성된 파제들외 배렬 
tids 룔 돌리며 일부 파제들이 시동되지 않았다면 과제벡토르외 헤당 위치에 
오유코드가 배치된다. 

pvm _ spawn () 호출은 또한 다중처 리 기 에 서 과제 들을 실 행 할수 있 다. 

InteliPSC /860 인 경우에는 다옴외 제한이 있다. 메개외 생성호출은 ntask 
크기만한 부분럽방체룔 얻으며 이 모든 마디들에 프로그람과제룔 적재한다. 
iPSC /860 외 조작체계는 메개 사용자들에게 10개까지외 부분럽방체들을 
배정하므로 iPSC /860 에서는 pvm_spawnO 을 한번 호출하여 과제들을 실행 
시키는것이 좋다. 

iPSC /860 에서 제각기 실행된 두조외 과제볼로크들은 비록 그것들이 서로 
다른 부분럽 방체 에 있다 하더 라도 다른 병 렬가상기계과제들과 마찬가지 로 서 로 
통신할수 있다. iPSC /860 조작체계는 마디들로부터 체계외부에로 나가는 통보를 
256 kbyte 아태 로 제 한하고있다. 

int info = pvm _ kill ( int tid ) 

call pvmfkilK tid , info ) 



pvmJdllO 함수는 TID 로 지정된 병렬가상기계과제들을 중지한다. 이 함수는 
kill 지령을 호줄한 과제는 중지 하지 않으며 호줄한 과제는 pvm_exitO 룔 
러용하여 중지한다. 

int info = pvm_catchout( FILE *ff ) 

call pvmfcatchoutC onoff ) 

병렬가상기계는 실행하는 과제들외 표준출구와 표준오유출구를 
/tmp/pvml. <uid> 에 기록하도록 기 정 으로 지 정하고있 다. pvm_catchoutO 함수는 
생성된 모든 자식과제들외 표준출구룔 어미과제에게 돌러주는 기눙을 수행한다. 

pvmd 는 자식과제들이 자기외 표준 출구나 표준 오유출구에 출구하는 
문자들을 수접하여 어미과제에 조종통보로 보내주며 어미파제는 메 행마다 
표식 을 달아 전용파일 에 그것 을 첨 부한다. 

출구접합이 가눙할 때 어미과제가 pvm_exitO 함수룔 호출하면 그는 
표준출구를 내 보내 는 모든 과제 들이 자기 외 결과룔 내 보내 고 중지할 때 까지 
기다린다. 

이것을 괴하기 위하여 프로그람작성자는 pvm_exitO 함수룔 호출하기전에 
pvm_catchout(0) 을 호출하여 모든 출구접 합을 완료한다. 

병렬가상기계는 새로운 처리기들을 추가하고 과제들을 처리기에 제출하며 
새로운 파제들을 실행하는 처리를 위하여 특별한 병렬가상기계과제들을 
등록하는 기 눙을 지 원하고있 다. 

이것은 병렬가상기계룔 러용하여 병렬가상기계일감들을 묶옴방식으로 
처리하는 개선된 묶옴처리계획화를 위한 대면부로써 설계되였다(그러한 실례로 
Condor, DQS, LSF 등을 들수 있다.). 

이 등록함수들은 또한 병렬가상기계룔 위한 오유수정도구들을 개발하기 
위하여 오유제거기작성자들을 위한 대면부로서 러용할수 있다. 

이 함수이름들은 pvm_reg_rm(), pvm_reg_hoster() 그리고 pvm_reg_ 


taskerO 이 다. 



2.2 정보 


int tid = pvm _ parent ( void ) 
call pvmfparentC tid ) 


pvm _ parent () 함수는 이 과제를 실행시킨 어미과제외 TID 흑은 이 과제가 
pvm _ spawnO 에 외 헤 창조된것 이 아니 라면 PvmNoParent 값을 돌러 준다. 

int dtid = pvm _ tidtohost ( int tid ) 
call pvmftidtohostC tid , dtid ) 

pvmJidtohostO 함수는 같은 처리기에서 함께 실행되는 데몬외 TID 를 
반환한다. 이 함수는 이 파제가 어느 처 리기 에서 실행되는가룔 결정할 때 
편리하다. 구성된 처리기들외 이롬과 같이 가상기계진체에 대한 보다 일반적인 
정보는 다옴외 기눙을 러용하여 얻을수 있다. 

int info = pvm _ config(int * nhost , int * narch , struct pvmhostinfo **hostp ) 
call pvmfconfigC nhost , narch , dtid , name , arch , speed , info ) 

pvm _ configO 함수는 처리기들외 개수 nhost , 여러가지 자료형식들외 개수 
narch 등 가상기 계 에 대 한 여 러 가지 정 보룰 돌러 준다. 

hostp 는 러용자가 정외한 pvmhostinfo 구조배렬에 대한 지적자이다. 배렬은 
적 어 도 nhost 크기 여 야 한다. 

메 pvmhostinfo 구조체는 pvmd 외 TID , 처 리 기 이 름, 구성 방식 이 름, 그 
처 리 기 외 상대 적 인 CPU 속도와 같은 정 보들을 포함한다. 

포트란함수는 한번 호줄할 때 한개외 처리기에 대한 정보룔 돌러준다. 따라서 
pvmfconfig 호출을 nhost 번 하면 전체 가상기 계 에 대 한 정 보가 얻 어 진다. 

현재는 pvmfconfigO 호출을 재설정하는 방범이 없으며 도중에 그것을 


재 시 동하게 되 여있 다. 



int info = pvm_tasks( int which, int *ntask, struct pvmtaskinfo **taskp ) 
call pvmftasksC which, ntask, tid, ptid, dtid, flag, aout, info ) 


pvmJasksO 함수는 가상기계에서 실행하는 병렬가상기계과제들에 대한 
정보를 돌러준다. 

현재 추가선택은 0을 포함하고있는데 이것은 모든 과제들과 pvmd 룔 
외 미 한다. 과제 들외 개 수는 ntask 에 들어 있다. 

taskp 는 pvmtaskinfo 구조배렬에 대한 지적자이다. 배렬외 크기는 ntask 이다. 
메개 pvmtaskinfo 구조체는 TID, pvmd 외 TID, 어미과제외 TID, 상태기발 
그리고 실행하는 과제외 이름을 포함하고있다(병렬가상기계는 수동적으로 
실행된 파제들외 파일이름은 모른다. 그러므로 이 경우에는 공백으로 남겨둔다.). 

포트란함수는 한개외 호출에서 한개외 과제에 대한 정보만 돌러주므로 
where = 0인 경우에는 pvmftasks 가 ntask 회수만큼 호출헤야 모든 과제들에 
대한 정보룔 얻을수 있다. 

포트란실행에서는 이 처리가 실행되는 동안에는 과제렬외 상태가 변하지 
않는다고 가정한다. 만일 렬이 변하면 변경된 상태들은 다옴번 호출을 할 때까지 
반영되지 않는다. 

pvm_configO 와 pvm_tasksO 에 대한 실례는 병렬가상기계조작락프로그람외 
원천에서 직접 찾을수 있다. 

2.3 동적구성 

int info = pvm_addhosts( char **hosts, int nhost, int *infos) 
int info = pvm_delhosts( char **hosts, int nhost, int *infos) 
call pvmfaddhostC host, info ) 
call pvmfdelhostC host, info ) 

C 함수들은 가상기계에 처리기들외 모임을 첨부하거나 삭제한다. 포트란 
함수들은 가상기 계 에 한개 외 처 러 기 룰 추가하거 나 삭제 한다. 

포트란 함수에서 info 는 1 흑은 상태코드를 돌러준다. 



C 함수에서 info 는 가상기계에 실제로 첨부된 처리기들외 개수를 돌러준다. 
변수 infos 는 가상기계에 추가되는 개별적인 처리기들에 대한 상태코드룔 
포함하고있는 길이가 nhost 인 배렬이다. 이것을 러용하여 리용자는 처리기들외 
모임 전체룰 다시 추가하거나 삭제하지 않고 문제가 생긴 한개외 처리기만을 
검사할수 있다. 

이 함수들은 때때로 가상기계룔 설정하는데 러용할수는 있지만 대체로는 큰 
웅용프로그람들에 서 오유허 용눙력 을 개 선하기 위 하여 리 용한다. 

이 함수들은 문제가 점점 풀기 어려워진다는것을 결정한 경우 웅용프로그람 
자체로 가상기계외 처 리눙력을 증가하는데 러 용할수 있다. 

그 한가지 실례는 CAD / CAM 프로그람인데 여기서는 계산기간에 유한요소 
격자를 세분화하면서 문제외 크기를 크게 증가시킨다. 또 한가지 사용범은 
처리기외 오유를 검출하고 새로운 처리기로 교체함으로써 웅용프로그람외 
오유허 용눙력 을 증가하는것 이 다. 

2.4 신호기수범 

int info = pvm _ sendsig ( int tid , int signum ) 
call pvmfsendsigC tid , signum , info ) 

int info = pvm _ notify ( int what , int msgtag , int cnt , int tids ) 
call pvmfnotifyC what , msgtag , cnt , tids , info ) 

pvm_sendsigO 함수는 TID 로 지정된 다른 병렬가상기계과제에 신호기 
signum 을 보낸다. pvm _ notify 는 호출자가 어떤 사건을 검출하였다는것을 
병 렬 가상기 계 에 게 통보한다. 

추가선 택 들은 다옴과 같다. 


PvmTaskExit - 과제 가 끝났음을 통보한다. 
PvmHostDelete - 처 리 기 가 삭제 되 였 옴을 통보한다. 
PvmHostAdd - 처 리 기 가 추가되 였 옴을 통보한다. 



통보요구에 웅답하여 병렬가상기계는 몇개외 통보들을 호출한 과제에게 


보낸다. 통보들은 리용자가 제공한 통보표적들을 붙인다. 

tids 배렬은 누가 언제 TaskExit 나 HostDelete 를 리용하는가룔 알러준다. 이 
배렬은 HostAdd 룔 러용할 때는 아무것도 포함하지 않는다. 

만일 요구하면 pvm _ config () 함수와 pvm _ tasksO 함수는 과제와 pvm 데몬외 
tids 룰 얻는데 리용할수 있다. 

만일 과제 A 룔 실행하는 처리기가 실패하고 과제 B 가 과제 A 가 완료 
하였는가룔 문외하였다면 과제 B 는 그것이 처리기외 실페로 인한 간접적인 
완료라 할지 라도 통보를 받는다. 

2.5 추가선택설정과 얻기 

int oldval = pvm _ setopt ( int what , int val ) 
int val = pvm _ getopt ( int what ) 
call pvmfsetoptC what , val , oldval ) 
call pvmfgetoptC what , val ) 

pvrn _ setoptO 함수는 병렬가상기계체계에서 러용자가 추가선택들을 설정하 
거나 얻을수 있게 하는 일반적인 함수이다. 병렬가상기계에서 
pvrn _ setopt () 함수는 자동적인 오유통보인쇄, 오유제거준위설정, 모든 병렬 
가상기 계호출들에 대 한 통신경 로지정 을 비 롯한 여 러 가지 추가선 택 들을 
리용할수 있다. 

pvm _ setoptO 함수는 oldval 에 있는 이전값들을 돌러준다. 

병렬가상기계에서 what 는 다옴외 값들을 가질수 있다. 

추가선택 값 외미 


PvmRoute 

PvmDebugMask 

PvmAutoErr 

PvmOutputTid 


1 경로지 정진 략 

2 오유제거마스크 

3 자동오유보고 

4 자식 처 러 에 대 한 표준 출구목적 지 



PvmOutputCode 5 
PvmTraceTid 6 

PvmTraceCode 7 
PvmFragSize 8 

PvmResvTids 9 

PvmSelfOutputTid 10 
PvmSelfOutputCode 11 
PvmSelfTraceTid 12 
PvmSelfTraceCode 13 


출구통보표적 
자식처리외 추적목적지 
추적통보표적 
통보토막크기 

에 약된 표적 들파 tid 들을 통보에 러 용 

자체외 표준출구목적지 

출구통보표적 

자체외 표준출구목적지 

추적통보표적 


pvrn _ setopt () 함수는 병렬가상기계과제들사이에 직접 통신을 지정하러고 할 
때 아주 많이 리용된다. 일반적인 규칙으로는 pvm _ setopt ( PvmRoute , 
PvmRouteDirect )룔 리 용하여 망에서 병 렬가상기 계외 통신대역 을 두배 로 할수 
있다. 약점 은 이 러 한 빠른 통신방범을 Unix 체계 에서는 적 용할수 없다는것 이 다. 

그러 므로 어 떤 병 렬가상기 계 웅용프로그람이 호상 통신하는 60개 이 상외 
파제들을 가지고있다면 동작하지 않는다. 

만일 동작하지 않으면 병렬가상기계는 자동적으로 기정외 통신방범으로 
돌아간다. 이것은 웅용프로그람외 실행중에 여러번 호줄되여 과제-파제사이에 
직접 통신련결을 실현할수 있다. 

그러나 일반적으로는 pvrn _ rnytidO 함수를 호출한 다옴에 한번만 사용한다. 

2.6 통보진달 

병렬가상기계에서 통보전송은 세 단계로 진행한다. 

첫째: pvmJnitsendO 함수나 pvm _ mkbufO 함수룔 호출하여 송신완충기룔 
초기 화한다. 

둘째: 몇개외 pvm _ pk = K ) 함수를 사용하여 통보들을 이 완충기에 

압측한다(포트란에서 모든 통보압측은 pvmfpackO 함수를 러 용하 
여 진행한다.). 




셋째: pvm_sendO 함수로 통보를 다른 프로께스에 보낼수 있으며 
pvm_mcastO 함수룔 통하여 다중통신할수 있다. 봉쇄 흑은 
비봉쇄수신함수를 호출하여 통보를 수신하며 수신완충기에 있는 
압축된 항목들을 푼다. 

수신함수들은 임외외 통보 흑은 지적된 원천으로부러 임외외 통보룔 
접수할수 있으며 어떤 통보표적이 붙은 통보 흑은 주어진 원천으로부터 특정외 
통보표적 이 붙은 통보를 접 수할수 있다. 

또한 통보가 접수되지는 않았지만 도착하였는지 검사하는 문외함수도 있다. 
만일 요구한다면 다른 수신문맥들도 병렬가상기계에서 조종할수 있다. 

pvrn_recvf() 함수룔 리 용하여 러 용자들은 병 렬 가상기 계 수신 함수들에 서 러 용 
할 자기 자체 외 수신 문맥 들을 정 외 할수 있 다. 

2.6.1 통보완층기들 

int bufid = pvm_initsend( int encoding ) 
call pvmfinitsencK encoding, bufid ) 

만일 리용자가 한개외 송신완충기를 가지고있다면(대체로 이것은 일반적인 
경우이다.) pvrn_initsendO 함수만을 러용한다. 이것은 새로운 통보를 완충기에 
압측하기전에 호출된다. 

pvrn_initsend() 함수는 송신완충기룰 지우고 새로운 통보룰 압측하기 위하여 
한개외 완충기를 창조한다. 새로운 완충기식 별자는 bufid 에 보관된다. 

부호화추가선 택 들은 다옴과 같다. 

PvmDataDefault - XDR 부호화는 이 통보를 보내기진에 리용자가 이종외 
처리기를 체계에 첨부하였는지 모르기때문에 기정으로 진행한다. 만일 러용자가 
그외 자료처 리형식을 알고있는 처 리기 에 통보룔 보낸다면 PvmDataRaw 
부호화방범을 리 용한다. 

PvmDataRaw - 부호화를 진행하지 않는다. 통보들은 자기 본래외 형 식 으로 
전송된다. 만일 수신하는 프로께스가 이 형식을 리헤하지 못하면 동보물기시에 
오유룔 내보낸다. 



PvmDataInPlace - 자료는 압측을 위하여 어떤 장소에 보관된다. 완충기들은 


다만 전송헤야 할 항목들외 크기와 지적자들만을 가지고있다. 

pvm_sendO 함수를 호출하면 항목들은 죽시 체계구역에 보관된다. 이 
추가선택은 리 용자가 통보들을 압측하고 또 그것들을 전송하는 사이 에 항목들을 
수정하지 않아도 되므로 통보룔 복사하는 회수를 줄일수 있다. 

이것은 한번 압측한 다옴에는 수정하여 웅용프로그람외 실행시에 여러번 
진송할수 있다. 

만일 리 용자가 웅용프로그람내 에 서 여 러 개 외 통보완충기 들을 관리 하러 고 
한다면 다옴외 통보완충기 함수들을 러 용한다. 

대다수외 프로께 스들사이 통신 에서 는 다중통보완충기 들이 필요없다. 

병렬가상기계에서는 어떤 시점에서 메 프로께스당 한개외 눙동인 송신 
완충기 와 한개외 눙동인 수신완충기 가 있다. 

개발자는 여러개외 통보완충기들을 창조하고 그것들을 서로 절환하면서 
자료외 압측과 전송을 실현할수 있다. 압측, 송신, 수신, 풀기는 오직 눙동 
완충기 들에 대 헤서 만 효력을 가진다. 

int bufid = pvm _ mkbuf ( int encoding ) 

call pvmfmkbufC encoding , bufid ) 

pvm _ mkbuf () 함수는 새로운 빈 송신완충기룔 창조하며 통보압측을 위헤 
리용하는 부호화방범을 지정한다. 이 함수는 완충기식 별자 bufid 룔 돌러준다. 

int info = pvm _ freebuf ( int bufid ) 

call pvmffreebufC bufid , info ) 


pvm_freebufO 함수는 식별자가 bufid 인 완충기룔 헤제한다. 이것은 통보를 
보낸 다옴 더 이상 완충기가 필요없을 때 진행한다. 또 필요하면 
pvm_rnkbufO 함수룰 호줄하여 새로운 동보완중기를 창조한다. 



pvrn_initsendO 함수룔 러용할 때는 이 함수들중 어느것도 러용할수 없다. 
왜냐하면 이 함수들은 리 용자들을 위 한 함수이 기때문이 다. 

int bufid = pvm _ getsbuf ( void ) 
call pvmfgetsbufC bufid ) 
int bufid = pvm _ getrbuf ( void ) 
call pvmfgetrbufC bufid ) 

pvm _ getsbuf () 는 눙동인 송신완충기식 별자룔 돌러준다. 
pvm_getrbufO 는 눙동인 수신완충기식 별자룔 돌러준다. 

int oldbuf = pvm _ setsbuf ( int bufid ) 
call pvmfsetrbufC bufid , oldbuf ) 
int oldbuf = pvm _ setrbuf ( int bufid ) 
call pvmfsetrbufC bufid , oldbuf ) 


이 함수들은 눙동인 송신(수신)완충기들을 bufid 에 설정하고 이전 완충기외 
상태 를 보관하고 이 전외 눙동완충기 식 별자룔 oldbuf 에 설정 한다. 

만일 pvm_setsbufO 나 pvm_setrbufO 에서 bufid 룔 0으로 설정하면 현재외 
완충기가 보관되며 눙동완충기는 존재하지 않는다. 이 특징을 러용하여 
웅용프로그람통보들외 현재 상태 룔 보관함으로써 역 시 병 렬가상기계 통보들을 
리 용하는 수학서 고나 그라픽 스대 면부들이 웅용프로그람통보들과 서 로 간섭 하지 
않게 할수 있다. 그것들을 완료하면 웅용프로그람외 완충기들을 눙동으로 
재설정할수 있다. 

리용자는 통보완충기함수들을 리용하여 통보들을 다시 압측하지 않고도 
진송할수 있다. 이에 대해서는 다옴에 설명한다. 

bufid = pvm _ recv ( src , tag )； 
oldid = pvm _ setsbuf ( bufid )； 
info = pvm _ send ( dst , tag )； 



info = pvm _ freebuf ( oldid )； 

2.6.2 자료외 압측 

다옴외 C 함수들은 주어진 자료형을 가진 배렬들을 눙동인 송신완충기에 
압측한다. 이 함수들은 자료룔 한개외 통보에 압측하기 위헤 여러번 호출된다. 
그러므로 한개외 통보는 서로 다른 자료형을 가진 여러개외 배렬들을 
가지고있을수 있다. C 구조체들은 그외 메 요소들을 압측해 야 한다. 

통보들은 임외로 압측할수 있지만 웅용프로그람들은 통보들을 자기가 
압측한대로 풀어야 한다. 이것은 엄밀하게 요구되지는 않지만 프로그람 
작성 에 서 는 이 규칙 을 지 켜 야 한다. 

함수에서 메개 변수들은 압측헤야 할 첫 항목에로외 지적자이다. nitem 은 이 
배렬에서 압측헤야 할 항목들외 전체 개수이며 stride 는 압측할 때 리용하는 
걸 옴수이다. 

한가지 례외적인것은 pvm_pkstrO 인데 이것은 문자렬들이 NULL 문자로 
끝나도록 정외하였기때문에 nitem 과 stride 변수가 필요없다. 

int info = pvm _ pkbyte ( char * cp , int nitem , int stride ) 
int info = pvm _ pkcplx ( float * xp , int nitem , int stride ) 
int info = pvm _ pkdcplx ( double * zp , int nitem , int stride ) 
int info = pvm _ pkdouble ( double * dp , int nitem , int stride ) 
int info = pvm _ pkfloat ( float * fp , int nitem , int stride ) 
int info = pvm _ pkint ( int * np , int nitem , int stride ) 
int info = pvm _ pklong ( long * np , int nitem , int stride ) 
int info = pvm _ pkshort ( short * np , int nitem , int stride ) 
int info = pvm _ pkstr ( char *cp ) 
int info = pvm _ packf ( const char * fmt , ... ) 

병렬가상기계는 또한 무슨 자료를 압측하며 그것을 송신완충기에 어떻게 
압측하는가룰 지 적하는 C 언어 에서외 인쇄지 령과 류사한 형식외 표기범을 
리 용하는 압측함수들을 제 공하고 있 다. 



count 와 stride 룔 지 적 하면 모든 변 수들은 주소로써 넘 어 가며 다른 경 우 
변수들은 값으로 취 급된다. 

포트란에서는 한개외 함수가 우에서 서 술한 C 함수들외 기눙을 담당한다. 

call pvmfpackC what , xp , nitem , stride , info ) 

변수 xp 는 압측헤야 할 배렬외 첫 항목이다. 포트란에서는 압측헤야 할 
문자렬에 있는 문자외 개수를 nitem 으로 설정 한다. 

옹근수 what 는 압측해 야 할 자료외 형 을 지 적 한다. 

추가선 택 들은 다옴과 같다. 


STRING 0 
BYTE 1 1 
INTEGERS 2 
INTEGER 4 3 


REAL 4 4 

C 0 MPLEX 8 5 
REALS 6 

C 0 MPLEX 16 7 


이 이름들은 pvm / include / fpvm.h 에 정외되 여 있다. 

2.6.3 자료외 송신파 수신 

int info = pvm _ send ( int tid , int msgtag ) 

call pvmfsendC tid , msgtag , info ) 

int info = pvm _ mcast ( int * tids , int ntask , int msgtag ) 

call pvmfmcastC ntask , tids , msgtag , info ) 

pvm_sendO 함수는 통보들에 옹근수값을 가진 통보표적을 붙여 프로께스 
TID 에 직접 보낸다. 

pvm _ rncast () 함수는 통보들에 옹근수값을 가진 통보표적을 붙여 옹근수배 렬 
tids (자기는 제외하고)에 지적된 모든 과제들에 전송한다. 


tids 배렬외 길이는 ntask 이다. 



int info = pvm _ psend ( int tid , int msgtag , void * vp , int cnt , int type ) 
call pvmfpsendC tid , msgtag , xp , cnt , type , info ) 


pvm_psendO 함수는 지적된 자료형을 가진 배렬을 압측하고 TID 로 지적된 
파제에 보낸다. 포토란에서 정외된 자료형들은 pvmfpackO 에서와 같다. 

{그에 서 형 변수들은 다옴과 같다. 

PVM_STR PVM_FLOAT 

PVM_BYTE PVM_CPLX 

PVM_SHORT PVM_DOUBLE 

PVMJNT PVM_DCPLX 

PVM_LONG PVM_UINT 

PVM_USHORT PVM_ULONG 

병 렬 가상기 계 에 는 여 러 가지 형 태 외 통보전 송방범 들이 있다. 

병렬가상기계에서는 송수신명령들이 서로 일치헤야 한다. 실례로 pvm _ 
psend 는 pvm_precv 와 일치하여 야 한다. 

다옴 함수들은 어느것이나 다 통보가 어떻게 발송되였는가에 관계없이 
임외외 들어오는 통보에 대하여 호출된다. 

int bufid = pvm _ recv ( int tid , int msgtag ) 
call pvmfrecvC tid , msgtag , bufid ) 

이 봉쇄수신함수는 msgtag 를 가진 통보가 TID 로부터 도착할 때까지 
기다린다. 다옴에 동보를 창조된 새로운 눙동수신완중기 에 배치 한다. 

이전외 눙동수신완충기는 그것이 pvm_setrbufO 호출로 보관하지 않는 한 
지 워 진 다. 

int bufid = pvm _ nrecv ( int tid , int msgtag ) 
call pvmfnrecvC tid , msgtag , bufid ) 



만일 요구된 통보가 도착하지 않으면 이때 비봉쇄수신함수 pvrn _ nrecv () 는 
bufid =0 을 되돌린다. 이 함수를 같은 통보에 대하여 여러번 호출하여 통보가 
도착하였는가를 검사하면서 그사이에 다른 처리를 진행할수 있다. 

다른 처리룰 진행하지 않을 때 봉쇄수신함수 pvrn_recvO 룔 호출하여 통보외 
도착을 검 사할수 있다. 

msgtag 표식을 가진 통보가 TID 로부터 도착하였다면 pvm_nrecvO 는 이 
동보룔 새로운 (창조된)눙동동보완중기 에 배치 하며 이 완중기 외 id 를 돌러 준다. 
이전외 눙동수신완충기는 그것이 pvrn_setrbufO 함수호출로 보관하지 않는 한 
지워 진다. 

int bufid = pvm _ probe ( int tid , int msgtag ) 

call pvmfprobeC tid , msgtag , bufid ) 

만일 요구하는 통보가 도착하지 않으면 이때 비봉쇄수신함수 pvrn _ probe () 는 
bufid =0 을 되돌린다. 다른 경우 동보외 bufid 룔 돌리지만 그것을 접수하지 
않는다. 

이 함수룔 같은 통보에 대하여 여러번 호출하여 통보가 도착하였는가룔 
검사하면서 그 사이에 다른 처리를 진행할수 있다. 추가적으로 귀환된 bufid 를 
가지고 pvrn _ bufinfo () 를 호줄하여 동보룔 접수하기 전에 그에 대한 정보룰 
결 정 한다. 

int bufid = pvm _ trecv ( int tid , int msgtag , struct timeval *tmout ) 

call pvmftrecvC tid , msgtag , sec , usee , bufid ) 

병 렬 가상기 계 는 또한 수신 에 서 시 간초과기 눙을 지 원하고있 다. 

오유나 실패로 하여 통보가 절대로 도착하지 않는 경우를 고찰하자. 

pvm_recvO 함수는 영원히 봉쇄될것이다. 

이러한 경우룔 피하기 위하여 리용자는 어떤 지정된 시간마큼 기다런 
다옴에는 그것을 포기하러 고 한다. 



pvm _ trecv () 함수는 사용자가 기다림시간량을 지정하게 한다. 만일 시간 
주기 가 대 단히 크면 pvm _ trecv 는 pvm _ recv 처 럼 동작한다. 시 간주기 룰 령 으로 
설정 하면 pvm_trecv 는 pvm_nrecv 처럼 동작한다. 따라서 pvm_trecv 는 
봉쇄수신파 비봉쇄수신 기눙들사이외 공백을 없앤다. 

int info = pvm _ bufinfo ( int bufid , int kbytes , int * msgtag , int *tid ) 
call pvmfbufinfoC bufid , bytes , msgtag , tid , info ) 

pvm _ bufinfoO 함수는 bufid 로 지적된 통보외 msgtag , 원천 TID , 바이트 
단위로 지정된 길이룰 돌러준다. 이것은 임외로 접수된 통보외 표식과 원천을 
결정하는데 리용할수 있다. 

int info = pvm _ precv ( int tid , int msgtag , void * vp , 

int cnt , int type , int * rtid , int * rtag , int *rcnt ) 
call pvmfprecvC tid , msgtag , xp , cnt , type , rtid , rtag , rent , info ) 
pvrn _ precv () 함수는 봉쇄 수신 기 눙과 수신된 완충기 내 용외 풀기 조작을 

동시에 수행한다. 이것은 bufid 룔 돌러주지 않는다. 대신에 TID , msgtag , 
그리고 ent 외 실제적 인 값들을 돌러준다. 

int (* old )() = pvm _ recvf(int (* new)(int bufid , int tid , int tag )) 

pvrn _ recvf () 함수는 수신함수들에서 리용되는 수신문맥을 수정하고 

병 렬가상기 계를 확장하는데 러 용된다. 기 정 외 수신문맥 은 원천과 통보표적 을 
정합하는것이다. 이것은 리용자가 정외한 비교함수에 외헤 수정될수 있다. 
pvm _ recvf () 에 대한 포트란대면부함수는 없다. 

2.6.4 자료외 풀기 

다옴외 C 함수들은 농동인 수신완충기로부러 자료형들을 풀어낸다. 

웅용프로그람에서 대웅하는 풀기함수들은 형과항목들외 개수, stride 가 
일치하여야 한다. nitem 은 풀어야 할 항목들외 개수이다. stride 는 걸옴이다. 



int info = pvm _ upkbyte ( char * cp , int nitem , int stride ) 
int info = pvm _ upkcplx ( float * xp , int nitem , int stride ) 
int info = pvm _ upkdcplx ( double 수 zp , int nitem , int stride ) 
int info = pvm _ upkdouble ( double * dp , int nitem , int stride ) 
int info = pvm _ upkfloat ( float * fp , int nitem , int stride ) 
int info = pvm _ upkint ( int * np , int nitem , int stride ) 
int info = pvm _ upklong ( long * np , int nitem , int stride ) 
int info = pvm _ upkshort ( short * np , int nitem , int stride ) 
int info = pvm _ upkstr ( char *cp ) 
int info = pvm _ unpackf ( const char 수 fmt , ... ) 

pvm_unpackfO 는 인쇄지 령과 류사한 형식외 표기 범을 러 용하여 무슨 자료룔 
풀기 하며 그것을 수신완충기에서 어떻게 풀기하는가를 지적한다. 포트란함수는 
한개 외 지 령 으로 우외 모든 기 눙들을 서 술할수 있다. 

call pvmfunpackC what , xp , nitem , stride , info ) 

변수 xp 는 통보를 풀어 야 할 배렬을 지적한다. 옹근수변수 what 는 풀어 야 할 
자료외 형을 지적한다. 

2.7 동적인 프로께스그몸들 

동적 인 프로께스그물기 능들은 핵심기 눙을 수행 하는 병 렬가상기계함수들외 
우에 구측되 였다. 러용자는 병 렬가상기 계서고 libgpvm . a 를 러용자프로그람과 
결합하여 그물기농들을 러용할수 있다. 

pvmd 는 그물기눙들을 수행 하지 않는다. 이 과제는 그물봉사기에 외해 
조종되며 첫번째 그물기눙이 실행될 때 자동적으로 실행된다. 

통보진 송대면부에서 그물들을 어떻게 조종하겠는가에 대한 문제에서 일련외 
문제들이 제기된다. 기본문제는 효과성과 믿음성이며 정적 대 동적그물들사이외 
절층안이다. 병렬가상기 계에서 그물기 농들은 리 용자에게 대단히 일반적이며 



효과적 으로 리 용하도록 설계되 였다. 어 떤 병 렬가상기 계 과제는 임 외 외 시 각에 
같은 그물에 있는 다른 과제들에 통보하지 않고 그물에 결합하거나 그물에서 
랄뢰할수 있다. 

파제들은 다른 그를에 속한 과제들에 통보룔 보낼수 있다. 일반적으로 
병 렬 가상기 계 파제 는 임 외 외 시 점 에 서 다옴외 그물기 눙들을 호출할수 있 다. 

례외로 되는것들은 pvm _ lvgroup (), pvm _ barrier () 그러고 pvm _ reduce () 
인데 이 지 령 들은 그 자체외 특성 상 호출하는 과제 가 특수한 그물외 성 원 일것을 
요구한다. 


int inum = pvm _ joingroup ( char *group ) 
int info = pvm _ lvgroup ( char *group ) 
call pvmf joingroupC group , inum ) 
call pvmflvgroupC group , info ) 


이 함수들은 리용자가 정외한 그물에 과제룔 결합하거나 내보낸다. 

첫 pvmJoingroupO 룔 호출하여 group 라는 이름을 가진 그물을 창조하며 
호출한 파제룔 이 그물에 넣는다. 

pvmJoingroupO 는 이 그물에 있는 프로께스외 실체번호 ( inum ) 룔 돌러준다. 
실체번호들은 0부러 그를성원들외 개수이다. 

병렬가상기계에서 과제는 여러 그를에 결합할수 있다. 만일 프로께스가 
그물을 러랄하였다가 다시 결합한다면 그 파제는 다른 실체번호를 가지게 된다. 

실체번호들은 그물에 결합하는 과제들이 될수록 제일 작은 번호룰 가지도록 
되 여있다. 그러 나 많은 파제 들이 한개 외 그물에 결 합된다면 과제 가 이 전외 
실체번호를 받는다는 담보는 없다. 

int tid = pvm _ gettid ( char * group , int inum ) 
int inum = pvm _ getinst ( char * group , int tid ) 
int size = pvm _ gsize ( char *group ) 
call pvmfgettkK group , inum , tid ) 
call pvmfgetinstC group , tid , inum ) 



call pvmfgsizeC group , size ) 


pvrn _ gettid () 는 주어진 그를이름과 실체번호를 가진 프로께스외 TID 를 
돌러준다. pvm _ gettid () 는 두개외 과제들이 호상 다른 과제들에 대하여 몰라도 
같은 그물에 결 합하기 만 하면 다른 파제 외 TID 를 알수 있게 한다. 

pvm_getinstO 함수는 지적된 그물에 있는 TID 외 실체번호를 돌러준다. 
pvrn _ gsize () 함수는 지적된 그물외 성원개수룰 돌러준다. 

int info = pvm _ barrier ( char * group , int count ) 
call pvmfbarrierC group , count , info ) 

pvm_barrierO 룔 호출한 프로께스는 그물에 있는 count 개수외 성원들이 
pvm_barrier 룔 호출할 때까지 봉쇄된다. 일반적으로 count 는 그를에 있는 전체 
성원들외 개수이다. 

동적 인 프로께스그를을 가진 병렬가상기계는 그물에 몇개외 성원들이 있는지 
모르기때문에 count 가 필요하다. 그물외 성원이 아닌 프로께스가 그 그물에 
대하여 pvrn_barrier 을 호출하면 오유가 발생한다. 또한 호출할 때 넘겨지는 
변수들이 일치하지 않을 때도 오유가 생긴다. 

실례로 그물외 어떤 성원이 count =4 룔 가지고 pvm_barrier 룔 호출하고 다른 
성원이 count =5 룰 가지고 pvm_barrier 를 호출하면 오유가 생긴다. 

int info = pvm _ bcast ( char * group , int msgtag ) 
call pvmfbcastC group , msgtag , info ) 

pvm _ bcast () 는 통보에 옹근수식별자 msgtag 룔 붙이 며 이 통보를 자기 룔 
제외한 그물내외 모든 파제들에 방송한다. pvm_bcastO 에서 모든 파제 
들이라는것은 이 함수를 호출할 때 그물봉사기가 인식하고있는 그물내외 모든 
파제 들을 외 미 한다. 



만일 파제들이 통보를 방송하는 기간에 그물에 결합된다면 그 과제들은 이 
통보룔 받지 못할것이다. 또 과제들이 통보룔 방송할 때 이 그물을 떠난다면 


통보외 복사물이 그 과제에 보내질것이다. 

int info = pvm _ reduce ( void (* func )(), void * data , int nitem , int 

datatype , int msgtag , char * group , int root ) 
call pvmfreduceC func , data , count , datatype , msgtag , group , root , 
info ) 


pvm_reduceO 는 그물전반에서 대역적인 산수연산들, 실례로 대역더하기와 
대 역 덜기 를 진 행 한다. 연산외 결과는 뿌리 프로께 스에 나타난다. 

병렬가상기계는 리용자가 func 로 서술할수 있는 4개외 함수를 지원하고있다. 
그것 들은 다옴과 같다. 

PvmMax 

PvmMin 

PvmSum 

PvmProduct 


이 연산은 입구자료에 대해서 요소별로 진행한다. 실례로 만일 자료배렬이 
두개 외 류점연산수들이 고 func 는 PvmMax 라면 이 계 산결과는 두개 외 수를 
포함하고있다. 죽 제일 큰값과 그물내외 성원들중에서 제일 큰값을 가지고있는 
성원을 포함하고있다. 

보충적 으로 리 용자는 자기 자체외 대 역 연산조작을 정 외 할수도 있다. 

그 실례는 병렬가상기계원천코드에서 찾을수 있다. 상세한 정보들은 
$ PVM _ ROOT / examples / gexample.c 룔 참조하면 된다. 

주외 : pvm_reduceO 는 봉쇄 되 지 않는다. 

만일 파제가 pvm_reduce 를 호출하고 결과룔 받기전에 그물을 떠난다면 


오유가 발생 한다. 



3. 프로그람실례 


여 기 서 는 병 렬 가상기 계 프로그 람들을 구체 적 으로 설 명 한다. 

첫번째 실례프로그람인 fork - join.c 는 프로께스들을 생성하고 동기화하는 
방범에 대하여 서술한다. 두번째 실례로서는 포트란언어로 서술한 스칼라적 
계산프로그람 PSDOT 룔 서 술한다. 

세 번째 실례프로그람 failure . C 는 러 용자가 pvm_notifyO 룔 러 용하여 
오유허용눙력을 가진 웅용프로그람을 개발할수 있는 방범을 서술한다. 여기서는 
행 렬급하기 프로그람을 제 시 하였 다. 

마지 막으로 병 렬가상기계룔 러 용하여 도선 에서외 열확산방정 식 을 계산하는 
실례 프로그람을 주었다. 

3.1 fork-join 

이 프로그람에서는 병렬가상기계과제들을 생성하고 그들사이외 동기룔 
보장하는 방범 에 대하여 서 술한다. 프로그람은 여 러개외 파제들을 생성 한다. 

기정으로 세개외 과제를 생성한다. 자식프로께스들은 다옴에 어미과제에 
통보를 보냄으로써 동기룔 실현한다. 어미는 생성된 메 과제들로부터 통보를 
접수하고 그 통보외 내용을 화면에 출력한다. fork-join 프로그람은 어미과제와 
자식 파제 들에 대 하여 각각 코드룔 작성 하였다. 

좀 더 구체 적 으로 실험 헤 보자. 

프로그람에서는 제일 먼저 pvm_mytidO 룔 호출한다. 이 기눙은 다른 
병 렬 가상기 계 기 눙들을 호출하기 전 에 먼 저 호출되 여 야 한다. 

pvrn_rnytidO 호출외 결과는 항상 정외옹근수이다. 정외옹근수가 아니라면 
오유가 발생 한것 으로 된다. 

fork-join 프로그람에서는 이 기눙을 호출하여 mytid 외 값을 검사하며 만일 
오유가 발생하면 pvrn_errorO 를 호출하여 프로그람을 끝낸다. 

pvm_perrorO 는 마지막 병렬가상기계호출에서 무엇이 잘못되였는가룔 
표시하는 통보룔 출력한다. 실례프로그람에서 마지막 호출은 pvm _ mytid () 
이므로 pvrn _ perror () 는 병렬가상기계가 이 처리기에서 시동되지 않았다는것을 
알리 는 통보룔 내 보낸다. 



pvm_perrorO 에서 변수는 그 어떤 오유통보에 pvm_perrorO 함수가 덧붙인 
어떤 문자렬이다. 우리외 경우에는 argv [이을 넘기는데 이것은 지령행에서 
입력한 프로그람외 이름이다. pvm _ perror () 는 Unix 체계외 perrorO 함수를 
리용하여 작성하였다. 

유효한 mytid 를 얻 었다고 가정 하고 pvm_parentO 를 호출한다. 

pvm_parentO 는 이 과제룔 생성한 과제(어미파제)외 과제 TID 를 돌러준다. 
초기외 fork-join 프로그람은 Unix 체계외 설에서 시작하였으므로 이 초기과제 
는 어 미 를 가지 지 않는다. 이 과제 는 그 어 떤 다른 병 렬 가상기 계 과제 에 외 헤 서 가 
아니 라 리 용자가 수동적 으로 실 행 시 킨 것 이 다. 

초기외 fork-join 과제에 대하여 pvm _ parent () 는 어떤 과제외 id 를 돌러주지 
않으며 오유코드 PvmNoParent 룔 내 보낸다. 

따라서 프로그람에서 는 pvm _ parent () 호출외 결과가 PvmNoParent 인가 
아닌가룔 검사하는 방범으로 어미과제 인가 흑은 자식과제 인가를 가를수 있다. 
만일 이 과제가 어미라면 자식파제들을 생성하며 어미가 아니라면 어미에게 
통보를 보낸다. 

어미과제가 실행한 코드를 검사헤보자. 과제들외 개수는 지령행에서 
argv [1] 로 주어진다. 파제외 개수가 적당치 않으면 pvm _ exit () 룔 호출하여 
프로그람을 끝내고 귀 환한다. 

pvm_exitO 는 병렬가상기계에게 이 프로그람이 더는 병렬가상기계외 
기눙들을 리용하지 않는다는것을 통보하므로 대단히 중요하다. (이 경우에 
파제는 완료하며 병렬가상기계는 이 과제가 더 이상 자기외 봉사를 받지 
않는다는것 을 알게 된다.) 

파제들외 개수가 적당하다고 인정하면 fork-join 은 다옴에 자식과제들을 
생성 하러고 시도한다. pvm_spawnO 은 병렬가상기 계에게 argv [이에 있는 
이름을 가진 ntask 개외 과제들을 창조할것을 요구한다. 두번째 파라메터는 
창조된 파제에게 넘기는 변수목록이다. 이 경우에 우리는 자식과제들에 특별한 
변수들을 넘 길 필요가 없으므로 이 값은 null 이 다. 

세번째 변수인 PvmTaskDefault 는 병렬가상기계에게 임외외 처리기에서 
파제들을 실행할것을 요구하는 변수이다. 만일 리용자가 파제룔 특별한 처리기 



흑은 어떤 구성방식을 가진 처리기에서 실행시키러고 하는 경우에는 이 구역에 
PvmTaskHost 흑은 PvmTaskArch 룔 입 력 하여 지 정 할수 있다. 

우리는 파제룔 어디에서 실행시키는가는 관계하지 않으므로 flag 에 
PvmTaskDefault 룔 지 정하며 4개외 변수들을 null 로 한다. 마지막으로 ntask 는 
몇 개 외 파제 들을 실 행 하는가를 지 적 한다. 

옹근수배렬 child 는 새롭게 생성된 자식파제들외 과제 id 들을 보관하고있다. 

pvm_spawn() 외 귀환값은 실제로 생성된 과제들외 개수이다. 

만일 info 가 ntask 와 일치하지 않으면 생성시에 어떤 오유가 발생한것으로 
된 다. 

오유가 발생한 경우 과제외 id 배렬외 child 에 실제적인 과제외 id 가 아니라 
오유코드가 배치된다. 

fork-join 프로그람은 이 배렬들을 순환하면서 과제외 id 흑은 오유코드들을 
출구한다. 

만일 과제가 성과적 으로 생성하였다면 프로그람은 완료한다. 

메개 자식과제들에 대하여 어미과제는 통보를 접수하고 그 통보에 대한 
정보를 출구한다. pvrn_recv() 호출은 임외외 과제로부터 통보를 접수한다. 

pvrn_recv() 외 귀환값은 통보완충기를 표시하는 옹근수이 다. 

pvm_bufinfoO 를 호출한다. 이것은 buf 로 표시된 통보에 대하여 수신자 
프로께 스외 통보길 이 , 표적 , 과제 id 를 얻는다. 

fork-join 에서 자식 프로께스가 보낸 통보들은 단일한 옹근수값과 자식과제외 
파제 id 룔 가지 고있다. 

pvm_upkintO 호출은 통보로부터 옹근수룔 꺼내여 mydata 변수에 보관한다. 
fork-join 은 간단한 검사룔 통하여 mydata 외 값과 pvm_bufinfo() 외 값을 
검사한다. 만일 값이 다르면 프로그람은 오유가 있다고 보고 오유통보를 
내보낸다. 마지막으로 통보에 대한 정 보룔 출구하고 어 미 프로그람을 끝낸다. 

fork-join 에서 마지막 코드토막은 자식과제가 실행 한다. 통보완충기에 
자료룔 배치하기전에 완충기는 pvmJnitsendO 룔 호출하여 초기화된다. 
PvmDataDefault 변수는 자료가 목적처리기에 정확한 형식으로 도착한다는것을 
담보하기 위하여 병 렬가상기계가 어떤 자료변환을 진행하는가룰 알러준다. 어떤 
경우에는 이것이 불필요한 자료변환으로 될수 있다. 



만일 목적 처 리기가 같은 자료형식을 리 용하기때문에 자료변환이 필요없다면 


PvmDataRaw 를 pvmJnitsendO 외 변수로 리 용할수 있 다. 

pvm_pkintO 호출은 단일 한 옹근수인 mytid 를 통보완충기에 배치 한다. 
대 웅하는 통보풀기 호출을 압측호출과 정 확히 일치 시 키 는것 이 중요하다. 압측과 
풀기는 일대일 대웅되여야 한다. 마지막으로 통보는 통보표적을 러용하여 
어미과제에 보내진다. 

fork-join 실례프로그람 


/* 

fork-join 실례 

프로께 스들을 생성 하고 통보들을 교환하는 방범 들을 서 술한다. 
*/ 

/* 병 렬가상기 계 서 고들을 위한정외와원형들*/ 

#include < stdio . h > 

#include < pvm . h > 

/* 프로그람에 서 생 성 할 자식 파제 들외 최 대 개 수 ■니 
#define MAXNCHILD 20 /* 통보에서 사용하는 표적 */ 
#define J 0 INTAG 11 
main(int argc , char * argv []) 

{ 

int ntask = 3； /* 생 성 할 과제 들외 개 수, 기 정 으로는 3 */ 

int info ； /* pvm 호출로부러 외 귀 환코드 */ 

int mytid ； /* 이 프로그람외 과제 id */ 

int myparent ； /* 어 미 과제 외 id */ 

int child [ MAXNCHILD ]； /* 배렬에 있는 자식과제 id */ 

int i , mydata , buf , len , tag , tid ； 

mytid = pvm _ mytid ()； /* 이 프로그람외 과제 id 를 찾는다. */ 
if (mytid < 0) { /* 오유검 사 */ 



pvm _ perror ( argv [0] )； /* 오유출구 '니 
return -1； /* 프로그람완료 ■니 

} 

myparent = pvm _ parent ()； /* 어미과제외 과제 id 룰 찾는다. '니 

/* PvmNoParent 가 아닌 오유가 발생하면 프로그람을 끝낸다. */ 
if ((myparent < 0) && (myparent != PvmNoParent )) { 
pvm _ perror(argv [0] )； 
pvm _ exit ()； 
return -1； 

} 

/* 어미를 가지지 않는다면 내가 어미이다. ■니 
if (myparent == PvmNoParent ) { 

h 생성해야 할 과제외 개수를 결정한다. 비 
if (argc == 2) ntask = atoi ( argv [ l ])； 

/* ntask 가 외미를 가지도록 설정한다. */ 
if ((ntask < 1) I I (ntask > MAXNCHILD )) { 
pvm _ exit ()； 
return 0； 


h 자식 과제 들을 생 성 한다. */ 

info = pvm _ spawn(argv [0], (char 베), PvmTaskDefault , (char 

ntask , child )； 

/* 과제 id 들을 출구한다. ■니 
for (i = 0； i < ntask ； i ++) 

if ( child [ i ] < 0) /* 오유코드들을 10 진수로 출구한다. */ 

printfC ' % d ", child [ i ])； 
else /* 과제 id 룔 16 진수로 출구한다. */ 


printf (" t % x \ t ", child [ i ] )； 



putcharC \ rr )； 

h 생성이 성파적으로 진행되도록 한다. */ 
if (info == 0) { 
pvm _ exit ()； 
return -1； 

} 

ntask = info ； 

for (i = 0； i < ntask ； i ++) { 

/* 임 외 외 자식 처 리 로부터 통보룔 접 수한다. 비 
buf = pvm _ recv (- l , JOINTAG )； 
if (buf < 0) 

pvm _ perror("calling recv ")； 
info = pvm _ bufinfo ( buf , & len , & tag , & tid )； 
if (info < 0) 

pvm _ perror("calling pvm _ bufinfo ")； 
info = pvm _ upkint (& mydata , 1, 1)； 
if (info < 0) 

pvm _ perror("calling pvm _ upkint ")； 
if (mydata != tid ) 

printfC'This should not happenPvrT )； 

printf("Length % d , Tag % d , Tid t % x \ n ", len , tag , tid )； 

} 

pvm _ exit ()； 
return 0； 

/* 자식 처 리 부분 */ 

info = pvm _ initsend ( PvmDataDefault )； 
if (info < 0) { 

pvm _ perror("calling pvm _ initsend ")； 
pvm _ exit ()； 



return -1； 


info = pvm _ pkint (& mytid , 1, 1)； 
if (info < 0) { 

pvm _ perror("calling pvm _ pkint ")； 
pvm _ exit ()； return -1； 

} 

info = pvm _ send ( myparent , JOINTAG )； 
if (info < 0) { 

pvm _ perror("calling pvm _ send ")； 

pvm _ exit ()； 

return -1； 

} 

pvm _ exit ()； 
return 0； 


% fork-join 
tlOOOlc t 40149 tc 0037 
Length 4, Tag 11, Tid t 40149 
Length 4, Tag 11, Tid tc 0037 
Length 4, Tag 11, Tid tlOOOlc 
% fork-join 4 

tlOOOle tlOOOld t 4014 b tc 0038 
Length 4, Tag 11, Tid t 4014 b 
Length 4, Tag 11, Tid tc 0038 
Length 4, Tag 11, Tid tlOOOld 
Length 4, Tag 11, Tid tlOOOle 



그림 3.1 fork-join 프로그람외 출구 


그림 3.1 은 fork-join 프로그람외 실행결과를 보여주고있다. 통보가 접수되는 
순서는 결정하지 못한다. 어미프로께스가 통보를 접수하는 기본고리는 던저 
들어 온 통보룰 던저 처 리 하는 원칙 이 므로 출구하는 순서 도 어 미 에 게 자식 처 러 외 
통보가 도착하는 순서 로 된다. 

3.2 스칼라적계산 

여기서는 단순한 포트란프로그람 PSDOT 룔 고찰한다. 이 프로그람은 
스칼라적을 계산하는 프로그람이다. 이 프로그람은 배렬 X , Y 외 스칼라적을 
계산한다. 

먼저 PSDOT 는 PVMFMYTIDO 와 PVMFPARENTO 를 호출한다. 

PVMFPARENTO 함수는 만일 과제가 다른 병렬가상기계과제로부러 생성된 
것 이 아니 라면 PVMNOPARENT 룔 돌러 준다. 

만일 이 경우라면 PSDOT 는 주프로그람으로 되며 PSDOT 외 다른 자식 
프로그람들을 생성헤야 한다. 다옴에 PSDOT 는 러용자로부터 프로께스외 
개수와 계 산헤 야 할 벡 토르외 크기 를 받는다. 

생성된 메개 자식처리들은 배렬 X , Y 외 n/nproc 개외 원소들을 어미로부터 
받는다. 우에서 n 은 벡토르외 길이이며 nproc 는 계산에 참가하는 프로께스들외 
개수이다. 만일 nproc 가 n 을 균등하게 나누지 못한다면 나머지 원소들에 대한 
스칼라적은 주프로그람이 계산한다. 

부분프로그람 SGENMAT 는 X , Y 외 값들을 우연적으로 생성한다. 다옴에 
PSDOT 는 n - 1개외 자식 프로께 스들을 생성 하고 새롭게 생성 된 자식 과제들에 X 
와 Y 외 부분요소들을 보낸다. 

통보에는 부분배렬들외 길이가 들어있다. 

자식프로께스들을 생 성 하고 부분벡 토르들을 보낸 다옴에 어 미프로께스는 X 
와 Y 배렬에서 자기에게 헤당한 부분을 계산한다. 어미프로께스는 그 다옴 
자식 프로께 스들로부터 부분적 인 스칼라적 계 산결과들을 받는다. 

어미프로께스는 모든 국부적인 스칼라적들을 접수하고 대역적인 
스칼라적 으로 그것들을 합친 다옴에 진체적 인 스칼라적을 계산한다. 



만일 PSDOT 프로그람이 자식처리라면 그는 던저 어미로부터 배렬 X , Y 외 
부분배렬들을 포함하고있는 통보룰 받는다. 이 부분배렬들에 대한 스칼라적을 
계산한 다옴에 결과를 어미에게 돌러준다. 

병 별가상기 계 실 례 프로그람 PSDOT.F 

* PSDOT 는 벡 토르 X , Y 외 병 렬스칼라적 을 계산한다.* 

* .. 외부부분루틴들 .. 

EXTERNAL PVMFMYTID , PVMFPARENT , PVMFSPAWN , PVMFEXIT , 
PVMFINITSEND 

EXTERNAL PVMFPACK , PVMFSEND , PVMFRECV , PVMFUNPACK , 
SGENMAT 


외부기눙들.. 

INTEGER ISAMAX 
REAL SDOT 

EXTERNAL ISAMAX , SDOT 

* .. 고유함수들 .. 

INTRINSIC MOD 

* 

* .. 파라메 터 들 .. 

INTEGER MAXN 
PARAMETER ( MAXN = 8000 ) 

INCLUDE Tpvm.h 후 

* 

* .. 벡토르 .. 

INTEGER N , LN , MYTID , NPROCS , IBUF , lERR 
INTEGER I , J , K 
REAL LDOT , GDOT 



* 


* .. 배 렬 .. 

INTEGER TIDS (0：63) 

REAL X ( MAXN ), Y ( MAXN ) 

* 

* PVM 에 등록, 자기자신과 어미외 과제 ID 번호를 얻는다. 

* 

CALL PVMFMYTIEK MYTID ) 

CALL PVMFPARENTC TIDS ( O ) ) 


* 어 미 프로께 스 


IF ( TIDS ( O ) . EQ . PVMNOPARENT ) THEN 


* 시 동정 보를 얻 는다. 

* 

WRITEO , *) '얼마나 많은 프로께스가 참가하는가 (1-64)? 후 

READC *, *) NPROCS 

WRITEC *, 2000) MAXN 

READO , *) N 

TIDS ( O ) = MYTID 

IF ( N . GT . MAXN ) THEN 

WRITEO , *) *N 은 지내 크다. 이 경우에 실행하기 위하여 파라메터 
MAXN 을 증가시 키 시 오.못 


STOP 
END IF 


* LN 은 국부적 으로 처 리 헤 야 할 스칼라적 요소들외 개 수 


> 1 = 



J = N / NPROCS 

LN = J + MOD ( N , NPROCS ) 

I = LN + 1 


* X 와 Y 룔 자유으로 생 성 한다. 

* 

CALL SGENMATC N , 1, X , N , MYTID , NPROCS , MAXN , J ) 

CALL SGENMATC N , 1, Y , N , I , N , LN , NPROCS ) 

> 1 = 

* 모든 자식 처 리들에 대하여 반복한다. 

* 

DO 10 K = 1, NPROCS - 1 
* 

* 프로께 스들을 생 성 하고 오유검 사 

* 

CALL PVMFSPAWNC * psdot 못 , 0, * any\\taV , 1, 

TIDS ( K ), lERR ) 

IF (lERR . NE . 1) THEN 

WRITEO , *) ' ERROR , 프로께 스룔 생 성 할수 없습니 다. ： T , K , 

CALL PVMFEXm lERR ) 

STOP 
END IF 


* 시 동정 보를 보낸다. 


CALL PVMFINITSENEK PVMDEFAULT , IBUF ) 
CALL PVMFPACKC INTEGER 4, J , 1, 1, lERR ) 
CALL PVMFPACKC REAL 4, X ( I ), J , 1, lERR ) 
CALL PVMFPACKC REAL 4, Y ( I ), J , 1, lERR ) 
CALL PVMFSENDC TIDS ( K ), 0, lERR ) 



10 CONTINUE 


* 스칼라적 계 산을 위 헤 어 미 처 리 가 처 러 해 야 할 부분을 얻 는다. 

* 

GDOT = SDOTC LN , X , 1, Y , 1 ) 

> 1 = 

* 국부적 인 스칼라적 을 접 수하고 

* 그것 을 대 역 적 인 스칼라적 에 더 한다. 

* 

DO 20 K = 1, NPROCS -1 
CALL PVMFRECVC -1, 1, IBUF ) 

CALL PVMFUNPACKC REAL 4, LDOT , 1,1, lERR ) 

GDOT = GDOT + LDOT 
20 CONTINUE 
> 1 = 

* 결 과출구 

* 

WRITEO , *) ' ' 

WRITEO , *) *< x , y > = ^ , GDOT 

LDOT = SDOTC N , X , 1, Y , 1 ) 

WRITE (*, *) *< x , y > : sequential dot product . < x , y >^ // 

$ 'distributed dot product / 

WRITEC *, *) *1 < x , y > - < x , yXM , ABS(GDOT - LDOT ) 

WRITEO , *) '실행이 완성되였습니다.후 
* 

* 자식프로께스외 실 행 부분 


ELSE 



* 


* 시 동정 보 접 수 
> 1 = 

CALL PVMFRECVC TIDS ( O ), 0, IBUF ) 

CALL PVMFUNPACKC INTEGER 4, LN , 1, 1, lERR ) 
CALL PVMFUNPACKC REAL 4, X , LN , 1, lERR ) 

CALL PVMFUNPACKC REAL 4, Y , LN , 1, lERR ) 

> 1 = 

* 국부적 인 스칼라적을 계산하고 그것을 어미 에게 보낸다. 

* 

LDOT = SDOTC LN , X , 1, Y , 1 ) 

CALL PVMFINITSENDC PVMDEFAULT , IBUF ) 

CALL PVMFPACKC REAL 4, LDOT , 1, 1, lERR ) 

CALL PVMFSENDC TIDS ( O ), 1, lERR ) 

END IF 


CALL PVMFEXm 0 ) 

* 

1000 FORMATdlO , * 프로께스르를 성과적으로 생성하였습니다. #* , 12, 
\ TID , 110) 

2000 FORMAT ( 'Enter the length of vectors to multiply (1- 못 , 17, 

r ) 

STOP 

> 1 = 

* PSDOT 프로그람외 끝 


END 



3.3 failure 프로그람 

failure 실례 프로그람은 러 용자가 파제들을 중지 하는 방범, 파제들이 
완료했는가 흑은 실페하였는가룔 찾는 방범에 대하여 서술한다. 이 실례에서 
우리는 이전외 실례에서와 마찬가지로 여러개외 과제들을 생성한다. 이 
파제들중외 하나는 어미과제에 외하여 중지된다. 

우리는 파제가 중지된것을 찾는데 흉미를 가지고있으므로 과제들을 생성한 
pvm_notifyO 를 호출한다. pvm_notify() 호출은 병렬가상기계에게 어떤 과제가 
중지된 경우에 이 지령을 호줄한 과제에 동보를 보낸다. 여기서 우리는 모든 
자식과제들에 흉미룔 가지 고있다. 

통지 문은 또한 새 로운 처 리 기 가 가상기 계 에 추가되 거 나 가상기 계 에 서 삭제 된 
경우 파제에게 통지하기 위하여 리용한다. 이 기눙은 프로그람이 현재외 체계에 
동적 으로 적 웅하러 고 할 때 효과적 으로 러 용할수 있다. 

통지룔 요구한 후에 어미파제는 자식파제들중 하나를 중지한다. 이때 
pvmJdllO 은 과제 id 변수로 지적된 과제를 중지한다. 

어미과제는 생성된 과제들중 한개외 과제룔 중지한 후 pvm_recv(-l, 
TASKDIED) 를 리 용하여 과제가 중지 하였다는 통보를 기다린다. 중지된 과제외 
파제 id 는 통지문통보에서 유일한 옹근수로 기억된다. 프로께스는 중지된 과제외 
파제 id 룰 꺼내서 줄구한다. 

실례프로그람 : failure.C 

/* 병 렬가상기계서고룔 참조하기 위한 정외와 원형들 */ 

#include <stdio.h> 

#include <pvm.h> 

#define MAXNCHILD 20 /* 생 성 할 파제 들외 최 대 개 수 */ 

#define TASKDIED 11 
main(int argc, char *argv[]) 

{ 

int ntask = 3； /* 생 성 할 과제 외 개 수, 기 정 으로는 3 */ 
int info； /* 귀환코드 */ 



int mytid ； /* 과제 외 과제 id '니 

int myparent ； /* 어 미 과제외 과제 id */ 

int child [ MAXNCHILD ]； /* 자식 과제 들외 과제 id 배 렬 비 

int i , deadtid ； 

int tid ； 

char * argv [5] ； 


mytid = pvm _ mytid ()； /* 과제외 과제 id 룔 얻는다. 수/ 
h 오유검 사 ■니 

if (mytid < 0) { 

pvm _ perror ( argv [0] )； /* 오유출구 */ 
return -1； /* 프로그람완료 비 

} 

myparent = pvm _ parent ()； /* 어미과제외 과제 id 룔 얻는다. 

PvmNoParent 가 아닌 오유가 발생하면 오유처 리 수/ 
if ((myparent < 0) && (myparent != PvmNoParent )) { 
pvm _ perror(argv [0] )； 
pvm _ exit ()； 
return -1； 

} 

/* 만일 어미과제가 없다면 이 프로그람이 어미과제로 된다. */ 
if (myparent == PvmNoParent ) { 

/* 생성 할 과제외 개수룔 결정 */ 
if (argc == 2) ntask = atoi ( argv [ l ])； 
if ((ntask < 1) I I (ntask > MAXNCHILD )) { 
pvm _ exit ()； 
return 0； 

} 

/* 자식 파제 들을 생 성 비 

info = pvm _ spawn(argv [0], (char 버 0, PvmTaskDebug , 



(char *)0, ntask, child )； 


/* 파제가 성파적으로 생성되 였는가를 검사 */ 
if (info != ntask) { 
pvm_exit ()； 
return -1 ； 

} 

/* tids 출구 */ 

for (i = 0 ； i < ntask ； i++) printf("t%x\t", child [i ])； putcharCAnO ； 
/* 자식과제가 중지되 였을 때 통지할것을 요구한다 . */ 
info = pvm_notify(PvmTaskExit, TASKDIED, ntask, child )； 
if (info < 0) { 

pvm_perror("notify ")； 
pvm_exit ()； 
return -1 ； 

} 

info = pvm_kill(child [ntask/2] )； 
if (info < 0) { 

pvm_perror("kiir ')； 
pvm_exit ()； 
return -1 ； 

} 

/* 통지 룔 기 다린다 . */ 

info = pvm_recv(-l, TASKDIED )； 

if (info < 0) { 

pvm_perror("recv ")； 
pvm_exit ()； 
return -1 ； 

} 

info = pvm_upkint(&deadtid, 1, 1 )； 
if (info < 0) 



pvm _ perror("calling pvm _ upkint '')； 
printfC'Task t%x has exited .\ n ", deadtid )； 
printfC'Task t%x is middle child .\ n ", child [ ntask /2] )； 
pvm _ exit ()； 
return 0； 

} 

/* 자식 과제 처 러 부분 */ 
sleep (63)； 
pvm _ exit ()； 
return 0； 

} 

3.4 행렬급하기 

다옴 실 례 프로그람은 행 렬급하기 알고리 둠을 서 술한다. 프로그람 mmult 는 이 
절외 마지막에서 찾을수 있다. mmult 프로그람은 C = A > i=B 를 계산한다. 여기서 C , 
A , B 는모두바른행 렬 이 다. 

단순하게 하기 위해 풀이를 계산하는데 m * m 개외 과제들이 참가한다고 
가정 한다. 메 개 과제 는 결과행 렬 C 외 부분볼로크룔 계 산한다. 

볼로크외 크기 와 m 외 값은 지 령행 변수로 주어 진다고 가정 한다. 행 렬 A 와 
B 는 m 스2개외 과제들에 분배된 볼로크들로 기억된다. 프로그람에 대하여 
구체 적 으로 보기 전 에 던 저 알고러 둠을 서 술한다. 

우리 는 m*rn 개 외 과제 그물을 가정 한다. 

메개 과제 (tij : 여기서 0< i , j < m ) 는 초기에 볼로크 Cij , Aij , Bij 룔 포함 
하고있다. 알고리둠외 첫단계에서 대각선상에 있는 과제들 ( tij ： 여기서 i = j ) 은 
볼로크 Aii 룔 i 째행외 다른 모든 과제들에게 보낸다. Aii 외 전송후에 모든 
파제들은 Aii*Bij 을 계산하고 결과를 Cij 에 더 한다. 

다옴 단계에서 행렬 B 외 렬볼로크들이 회전된다. 죽 tij 는 볼로크 B 에서 
자기에게 해당한 부분을 t ( i - l)j 에 보낸다(과제 tij 는 볼로크 B 에서 자기에게 
해당한 부분을 t ( m - l)j 에 보낸다.). 



이제 과제들은 첫 단계로 돌아간다. Ai ( i +1) 는 행 i 에 있는 모든 파제들에 
방송되며 알고리둠은 계속된다. M 번 반복한 후에 C 행렬은 A*B 룔 
포함하고있으며 B 행렬은 회전되 였다. 

병렬가상기계에서는 과제들사이에 호상 통신하는데는 그 어떤 제한이 없다. 
그러 나 이 프로그람에 대해서는 과제들이 2차원그물구조로 결합되 여있는것처 럼 
생 각한다. 

파제들을 별거하기 위하여 메 과제는 그물 mmult 에 결합된다. 그를 id 들은 
파제들을 그물에 배치하기 위하여 리용된다. 

그물에 처 옴 결합하는 과제는 그물번호 0을 가진다. 

mmult 프로그람에서 그물번호가 0인 과제는 다른 과제들을 창조하며 행렬 
급하기 에 필요한 변수들을 과제들에 보낸다. 변수들은 이과 bklsize 이다. 

죽 볼로크개수외 두제급뿌리와 볼로크외 크기 이다. 모든 과제들이 창조되고 
변수들이 전송된 다옴에 pvm _ barrierO 가 호출되여 파제들 모두가 그물에 
결합하게 한다. 

장벽동기화룰 하지 않으면 과제가 그를에 결합되지 않았기때문에 후에 
pvm _ gettidO 를 호출하는 경우에 오유가 생긴다. 장벽동기화를 한 다옴 같은 
행에 있는 다른 과제들외 과제 id 들을 배렬 myrow 에 보관한다. 

이것은 행에 있는 모든 과제들에 대하여 그물 id 들을 계산하고 대웅하는 그물 
id 에 대한 과제 id 룔 병렬가상기계에 문외하여 진행한다. 다옴에 mallocO 를 
러용하여 행렬에 대한 볼로크들을 할당한다. 실제적인 웅용프로그람에서는 
행 렬들이 이미 할당되 여있다고 가정 한다. 

다옴에 프로그람은 그가 계산할 행렬 C 외 행과 렬을 계산한다. 이것은 그물 
id 외 값에 기초하고있다. 그물외 범위는 0부터 m - l 이다. 따라서 ( mygid / m ) 외 
옹근수부분은 파제외 행을 주며 (mygid mod m ) 은 렬을 준다. 류사한 배치 
수범을 리용하여 우리는 그물에서 우와 아태에 있는 과제들외 그물 id 룔 직접 
계산한다. 

다옴에 InitBlockO 룔 호출하여 볼로크들을 초기화한다. 이 함수는 행렬 A 를 
란수값으로 B 를 단위행 렬로, C 룰 0으로 초기화한다. 이 것은 A = C 임을 
검사함으로써 프로그람외 끝에서 계산을 검증한다. 



마지막으로 기본순환에 들어가 행렬급하기룔 진행한다. 먼저 대각선에 있는 
파제들은 행렬 A 외 대웅부분을 그 행에 있는 모든 파제들에 방송한다. 배렬 
myrow 는 실제로 방송하는 과제외 과제 id 룔 가지고있다. pvm_rncastO 는 
호출하는 과제를 제외하고 과제배렬에 있는 모든 과제들에 통보를 보낸다는것을 
상기 시킨 다. 

다중통신 하는 과제 와 볼로크를 수신 하는 과제 는 대 각선 볼로크와 과제 에 있는 
행렬 B 외 볼로크에 대하여 A*B 룰 계산한다. 부분볼로크들이 급헤지고 
C 볼로크에 더해진 다옴에 볼로크 B 를 수직으로 밀기한다. 

특히 B 볼로크를 통보에 압측하고 그것을 우쪽과제에 보내며 과제 id 외 
아래쪽으로부러 새로운 B 볼로크를 접수한다. 서로 다른 순환연산에 따라 
A 볼로크들과 B 볼로크들을 보내는 통보표적들이 서로 다르다. 또한 
pvm _ recv () 를 리 용할 때 과제 id 들을 완전히 지 적 한다. 

일단 계산이 완료되면 행렬급하기가 C 외 값을 정확히 계산했는가를 검증하여 
A = C 인가를 확인한다. 이 검사는 행 렬급하기 함수안에서는 진행하지 않는다. 

병 렬가상기 계는 과제 가 중지 되 였옴을 인식할 필요가 없으므로 
pvmJvgroupO 를 호출할 필요가 없다. 그러나 pvm _ exit () 룔 호출하기 전에 
그물에서 랄뢰하는것이 좋다. 

실례프로그람: mmult.c 
/* 

행렬 급하기 
#include < stdio . h > 

#include ** pvm . h *' 


#define MAXNTIDS 100 
#define MAXROW 10 
#define AT AG 2 
#define BTAG 3 


#define DIMTAG 5 



void InitBlockCfloat 후 a , float * b , float * c , int blk , int row , int col ) 


int len , ind ； 
int i , j ； 

srand ( pvm _ mytid ())； 
len = blk ^ blk ； 

for (ind = 0； ind < len ； ind ++) { 

a [ ind ] = ( float )( rand ()% 1000)/100.0； c [ ind ] = 0.0； 

} 

for (i = 0； i < blk ； i ++) 

for (j = 0； j < blk ； j ++) { 
if (row == col ) 
b [ j * blk + i ] = ( i == j )? 1.0 : 0.0； 
else 

b [ j * blk + i ] = 0.0； 


void BlockMultCfloat 수 c , float 우 a , float * b , int blk ) 

{ 

int i , j , k ； 

for (i = 0； i < blk ； i ++) 

for (j = 0； j < blk ； j ++) 

for (k = 0； k < blk ； k ++) 

c [ i * blk + j ] += (a [ i * blk + k ] * b [ k * blk + j ] )； 


mainCint argc , char * argv []) 



int ntask = 2； 


int info ； 

int mytid , mygid ； 

int child [ MAXNTIDS -1]； 

int i , m , blksize ； 

int myrow [ MAXROW ] ； 

float 우 a , * b , 우 c , * atmp ； 

int row , col , up , down ； 

mytid = pvm _ mytid ()； /* 이 과제 id 룔 찾는다. */ 
pvm _ setopt ( PvmRoute , PvmRouteDirect )； 
if (mytid < 0) { /* 오유검 사 수/ 

pvm _ perror(argv [이); /* 오유출구 */ 

return -1； 

} 

mygid = pvm _ joingroup (" mmult ")； /* mmult 그를에 결 합한다. */ 
if (mygid < 0) { 

pvm _ perror ( argv [0] )； pvm _ exit ()； return -1； 

} 

그물 id 가 0 이 면 다른과제 들을 창조한다. ■니 
if (mygid == 0) { 

/* 몇 개 외 파제 들을 창조할것 인 가를 결 정 한다. 비 
if (argc == 3) { 

m = atoi ( argv [ l ])； 
blksize = atoi ( argv [2] )； 

} 

if (argc < 3) { 


fprintfCstderr , " usage ： mmult m blk \ n ")； 

pvm _ lvgroup (" mmult ")； 

pvm _ exit ()； 



return -1； 


ntask = m ^ m ； 

if ((ntask < 1) I I (ntask >= MAXNTIDS )) { 

fprintfCstderr , "ntask = %d not valid .\ n ", ntask )； 

pvm _ lvgroup (" mmult ")； 

pvm _ exit ()； 

return -1； 

} 

/* 파제가 하나밖에 없다면 파제룔 창조할 낄요가 없다. */ 

if (ntask == 1) goto barrier ； 

/* 아들과제 창조 */ 

info = pvm _ spawn (" mmult ", (char **)0, PvmTaskDefault , 

(char *)0, ntask -1, child )； 
if (info != ntask -1) { 
pvm _ lvgroup (" mmult ")； 
pvm _ exit ()； 
return -1； 

} 

/* 행 렬차수를보낸다. 비 
pvm _ initsend ( PvmDataDefault )； 
pvm _ pkint (& m , 1, 1)； 
pvm _ pkint (& blksize , 1, 1)； 
pvm _ mcast ( child , ntask -1, DIMTAG )； 

else { 

/* 행 렬차수 접 수 비 

pvm _ recv ( pvm _ gettid (" mmult ", 0), DIMTAG )； 
pvm _ upkint (& m , 1, 1)； 
pvm _ upkint (& blksize , 1, 1)； 



ntask = m*m ； 


/* 과제들이 모두 그물에 결합되게 한다 .*/ 

barrier ： 

info = pvm_barrier("mmult", ntask )； 
if (info < 0) 

pvm_perror(argv [0] )； 

/* 같은 행 에 있는 tid 들을 찾는다 . 비 
for (i = 0 ； i < m ； i++) 

myrow[i] = pvm_gettid("mmult", (mygid/m)*m + i )； 
I ■누 볼로크를 위 한 기 억 기 할당 비 
a = (float *)malloc(sizeof(float)*blksize*blksize )； 
b = (float *)malloc(sizeof(float)*blksize*blksize )； 
c = (float *)malloc(sizeof(float)*blksize*blksize )； 
atmp = (float *)malloc(sizeof(float)*blksize*blksize )； 


if (!(a && b && c && atmp)) { 

fprintfCstderr, "%s ： out of memoryPvn", argv[0] )； 

free(a )； 

free(b )； 

free(c )； 

free(atmp )； 

pvm_lvgroup("mmult ")； 
pvm_exit ()； 
return -1 ； 


/* 행과 렬을 계산한다 . */ 
row = mygid/m ； 
col = mygid % m ； 



h 이 웃에 있는 우와 아래룔 계산 */ 

up = pvm_gettid("mmult", ((row) ? (row-l))*m+col )； 

down = pvm_gettid("mmult", ((row == (m-1)) ? col ： (row+l)*m+col ))； 

InitBlockCa, b, c, blksize, row, col)；/* 볼로크초기화 */ 

for (i = 0 ； i < m ； i++) { /* 행 렬급하기 진행 */ 

/* 행 렬 A 외 볼로크를 방송 비 
if (col == (row + i)%m) { 
pvm_initsend(PvmDataDefault )； 
pvm_pkfloat(a, blksize^blksize, 1 )； 
pvm_mcast(myrow, m, (i+l)^ATAG )； 

BlockMultCc, a, b, blksize )； 

} 

else { 

pvm_recv(pvm_gettid("mmult", row^m + (row +i)% m), (i+l)*ATAG )； 
pvm_upkfloat(atmp, blksize^blksize, 1 )； 

BlockMultCc, atmp, b, blksize )； 

} 

/* B 외 렬들을 회 진 */ 
pvm_initsend(PvmDataDefault )； 
pvm_pkfloat(b, blksize^blksize, 1 )； 
pvm_send(up, (i+l)*BTAG )； 
pvm_recv(down, (i+l)*BTAG )； 
pvm_upkfloat(b, blksize^blksize, 1 )； 

} 

/* 검 사 */ 

for (i = 0 ； i < blksize^blksize ； i++) 
if (a[i] != c[i]) 

printfC'Error a[%d] (%g) != c[%d] (%g) \n", i, a[i], i, c[i ])； 
printf("DoneAn ")； 

free(a )； free(b )； free(c )； free(atmp )； 



pvm_lvgroup("mmult")'. 

pvm_exit ()； 

return 0 ； 


3.5 1 차원열전도방정식 

여기서는 도신 인 경우에 메질을 통하여 열확산이 진행되는 과정을 계산하는 
병 렬 가상기 계 프로그람을 보여 준다 . 가는 도선상에 서 외 1 차원 열 전 도방정 식 을 
고찰하자 . 열전도방정 식 은 다옴과 같이 표시 된다 . 

dA _ ()-A 

이 방정식외 불련속형식 은 다옴과 같다 . 

- •Wl J ~ ~ * ■ 근 - ~V.; 수 

Xt ~ a7^ 

방정식외 풀이공식은 

At 

+ + + l - * 고 - ■k./ + 

초기조건파 경 계조건 은 아래 와 같다 : 

모든 t 에 대하여 

A(t, 0) = 0, .4(/, 1) = () for all I 
.4((), a*) = siii(7rr) for 0 < x < 1. 

가상코드는 아래 와 같다 . 

for i = 1 ： tsteps-1 

t = t+dt ； 

a(i+l, 1)=0 ； 

a(i+l, n+2)=0 ； 

for j = 2 ： n+1 ； 

a(i+l, j)=a(i, j) + mu*(a(i, j+l)-2*a(i, j)+a(i, j-1 ))； 
end ； 

plot(a(i, j)) 



end 


이 실례에서는 주-종속형식외 계산모형을 리용한다. 

주프로그람인 heat.c 는 5개외 종속프로그람인 heatslv 프로그람을 생성한다. 
종속프로그람들은 도선외 부분토막들에 대한 열확산파정을 병 렬로 계산한다. 
종속프로그람들은 메 단계에서 경계정보들을 교환한다. 이 경우에는 
처리기들사이에 경계에서 도신외 온도값을 교환한다. 코드룔 좀 더 구체적으로 
보자. 

heat.c 에서 배렬 solution 에는 메 단계에서외 열확산방정식에 대한 풀이룔 
가지고있다. 이 배렬은 프로그람외 끝에서 xgraph 형식으로 출구한다 (xgraph 는 
자료를 찍는 프로그람이 다.). 

던저 heatslv 프로그람들을 생성한다. 다옴에 초기자료모임들을 계산한다. 
도선외 량끝에서는 초기온도값이 0으로 주어진다. 프로그람외 기본부분은 서로 
다른 멸타 t 에 대하여 4번 실행 한다. 

계수기 를 리 용하여 메 단계 에 서 걸 런 시 간을 계 산한다. 

초기자료모임들은 heatslv 과제들에 보낸다. 초기자료모임과 함께 왼쪽 및 
오른쪽 파제들외 과제 id 룰 보낸다. heatslv 과제들은 이것을 러용하여 
경계 정 보들을 교환한다. (선택 적 으로 병 렬가상기 계 그물호출을 러 용하여 
파제토막들을 도선에 배치할수 있다. 그물호출을 러용하여 과제 id 들을 종속 
파제들에 보내는 문제룔 피 할수 있다.). 

초기자료룔 보낸 후에 주프로께스는 결과룔 기다리기만 한다. 결파가 
도착하면 그것을 물이 행 렬에 동합하고 계산시 간을 구하며 물이를 xgraph 에 
출구한다. 

일단 4단계에 따르는 자료를 계산하고 보관하면 주프로그람은 계산시간을 
출구하고 종속프로께 스들을 완료한다. 

실례프로그람 : heat.c 

/* 

heat.c 는 병렬가상기계를 리용하여 단순한 열확산방정식을 푼다. 한개외 
주프로그람파 5개외 종속프로그람을 리용한다. 



주프로그람은 자료들을 설정하고 그것들을 증속프로그람에 보내며 결과룔 


기다린다 . 

비 

#include <stdio.h> 

#include <math.h> 

#include <time.h> 

#include "pvm.h" 

#define SLAVENAME "heatslv" 
#define NPROC 5 
#define TIMESTEP 100 
#define PLOTINC 10 
#define SIZE 1000 
int num_data = SIZE/NPROC ； 


mainO 

{ 

int mytid, task_ids [NPROC], i, j ； 
int left, right, k, 1 ； 
int step = TIMESTEP ； 
int info ； 

double init [SIZE], solution [TIMESTEP] [SIZE] ； 

double result [TIMESTEP>hSIZE/NPROC] , deltax2 ； 

FILE ^filenum ； 

char ^filename [4] [7] ； 

double deltat[4] ； 

time_t to ； 

int etime [4] ； 

filename [이 [0] = "graphl "； 
filename [1] [0] = "graphs "； 



filename [2] [0] = "graphs "； 
filename [3] [0] = "graph4 "； 
deltat [이 = 5.0e-l ； 
deltat[l] = 5.0e-3 ； 
deltat [2] = 5.0e-6 ； 
deltat [3] = 5.0e-9 ； 

mytid = pvm_mytid ()； /* pvm 에 등록 수 / 

info = pvm_spawn(SLAVENAME, (char 버 0, PvmTaskDefault, 

NPROC, taskjds )； 

/* 초기 자료모임 창조 ■니 
for (i = 0 ； i < SIZE ； i++) 

init[i] = sin(M_PI * ( (double)i / (double)(SIZE-l) ))； 
init[0] = 0.0 ； 
init[SIZE-l] = 0.0 ； 

/* delta t 외 서 로 다른 값들에 대하여 프로그람을 4 번 실행 비 
for (1 = 0 ； 1 < 4 ； 1++) { 

deltax2 = (deltat [l]/pow(L0/(double)SIZE, 2.0 ))； 
time(&t0 )； /* 시동시간계산 */ 
etime [1] = tO ； 

/* 초기 자료들을 증속프로께스들에 보낸다 . 비 

/* 경 계 자료들을 교환하는데 낄요한 이 웃정 보들을 포함 ■니 

for (i = 0 ； i < NPROC ； i++) { 

pvm_initsend(PvmDataDefault )； 

left = (i == 0) ? 0 ： task_ids [i-1] ； 

pvm_pkint(&left, 1, 1 )； 

right = (i == (NPROC-1)) ? 0 : task_ids [i+1] ； 

pvm_pkint(&right, 1, 1 )； 

pvm_pkint(&step, 1, 1 )； 

pvm_pkdouble(&deltax2, 1, 1 )； 



pvm_pkint(&num_data, 1, 1 )； 
pvm_pkdouble(&init[num_data*i], num_data, 1 )； 
pvm_send(task_ids [i], 4 )； 

} 

/* 결과 기다림 */ 
for (i = 0 ； i < NPROC ； i++) { 
pvm_recv(task_ids [i], 7 )； 

pvm_upkdouble(&result[0], num_data*TIMESTEP, 1 )； 
for (j = 0 ； j < TIMESTEP ； j++) /* 풀이 갱신 */ 
for (k = 0 ； k < num_data ； k++) 
solution [j] [num_data*i+k] = result [wh(j, k)] ； 

} 

/* 계 수 중지 */ 

time(&t0 )； 

etime [1] = tO - etime [1] ； 

/* 출구 ■니 

filenum = fopen(filename [1] [ 이 , "w ")； 

fprintfCfilenum, "TitleText ： Wire Heat over Delta Time ： %e\n\ 
deltatQ ])； 

fprintf(filenum, "XUnitText ： Distance\nYUnitText ： Heat\n ")； 
for (i = 0 ； i < TIMESTEP ； i = i + PLOTINC) { 
fprintf (filenum, "V'Time index* %d\n \ i )； 
for (j = 0 ； j < SIZE ； j++) 

fprintf(filenum, "%d %e\n \ j, solution[i] [j ])； 
fprintfCfilenum, "\n ")； 

} 

fclose (filenum )； 

} 

/* 시 간계 수정 보룔 출구 */ 
printfC'Problern size* %d\n \ SIZE )； 



for (i = 0 ； i < 4 ； i++) 

printfC'Time for run %d ： %d sec\n", i, etime [i] )； 

/* 종속프로께 스들을 중지 */ 
for (i = 0 ； i < NPROC ； i++) 
pvm_kill(task_ids [i] )； 
pvm_exit ()； 

} 

int wh(x, y) 
int X, y ； 

{ 

return(x*num_data+y) ； 

} 

heatslv 프로그람들은 도신을 통하여 진행되는 실제적인 열확산과정을 
계산한다 . 종속프로그람은 초기 자료모임을 접 수하고 이 자료모임 에 기 초하여 
풀이를 반복계산하며(메 반복에서 경계정보들을 이웃들과 교환한다 .) 결과들을 
주프로그람에게 보낸다 . 

주파제들이 무한순환을 하지 않고 실행을 중지하라는 어떤 통보룰 종속 
파제에 보낼수도 있다 . 그러나 통보전송외 복잡성을 피하기 위하여 종속과제 
들에서는 무한순환을 러용하며 주프로그람으로부러 그 과제들을 중지하게 하였 

다 . 

메 단계에 대하여 또 메 계산단계에 들어가기전에 온도행렬외 경계값들이 
교환된다 . 던저 왼쪽외 이웃파제들에 왼쪽경계요소들이 진송되며 오른쪽 
이 웃파제 들로부터 접 수된 다 . 마찬가지 로 오른쪽경 계 요소들은 오른쪽외 이 웃 
파제에게 보내지고 왼쪽 이웃으로부터 접수된다 . 


실례 프로그람 : heatslv. C 
/* 



종속파제 들은 주파제 로부러 초기 자료룔 접 수하고 이 웃들과 경 계 자료들을 


교환하며 도신에서외 열변화룔 계산한다 . 

비 

#include <stdio.h> 

#include "pvm.h" 

int num_data ； 
mainO 
{ 

int mytid, left, right, i, j ； 
int timestep ； 
double *init, 수 A ； 

double leftdata, rightdata, delta, leftside, rightside ； 

mytid = pvm_mytid ()； 

/* 프로그람으로부러 자료접수 */ 

while(l) { 

pvm_recv(right, 4 )； 

pvm_upkint(&left, 1, 1 )； 

pvm_upkint(&right, 1, 1 )； 

pvm_upkint(&timestep, 1, 1 )； 

pvm_upkdouble(&delta, 1, 1 )； 

pvm_upkint(&num_data, 1, 1 )； 

init = (double *)malloc(num_data*sizeof(double ))； 

pvm_upkdouble(init, num_data, 1 )； 

/* 초기자료룔 작업배렬에 복사한다 . */ 

A = (double *)malloc(num_data * timestep * sizeof(double ))； 
for (i = 0 ； i < num_data ； i++) A[i] = init[i] ； 

/* 계 산 */ 

for (i = 0 ； i < timestep-1 ； i++) { 



/* 이웃들과 경계정보룔 교환 */ 

/* 왼쪽으로 보내고 오른쪽에서 접수 */ 
if (left != 0) { 


pvm_initsend(PvmDataDefault )； 
pvm_pkdouble(&A[wh(i, 0)], 1, 1 )； 
pvm_send(left, 5 )； 

} 

if (right != 0) { 

pvm_recv(right, 5 )； 
pvm_upkdouble(&rightdata, 1, 1 )； 
pvm_initsend(PvmDataDefault )； 
pvm_pkdouble(&A[wh(i, num_data-l)], 1, 1 )； 
pvm_send(right, 6 )； 

} 

if (left != 0) { 

pvm_recv(left, 6 )； 
pvm_upkdouble(&leftdata, 1, 1 )； 

} 

for (j = 0 ； j < num_data ； j++) { 

leftside = (j == 0) ? leftdata : A[wh(i, j-1)] ； 

rightside = (j == (num_data-l)) ? rightdata : A[wh(i, j+1)] ； 

if ((j==0)&&(left==0)) 

A[wh(i+1, j)] = 0.0 ； 

else if ((j==(num_data-l))&&(right==0)) 

A[wh(i+1, j)] = 0.0 ； 


else 

A[wh(i+1, j)] = 

A[wh(i, j)] +delta*(rightside-2*A[wh(i, j)] +leftside )； 



/* 결과룔 주프로그람에 보낸다 . */ 
pvm_initsend(PvmDataDefault )； 
pvm_pkdouble(&A[0] , num_data*timestep, 1 )； 
pvm_send(right, 7 )； 

pvm_exit ()； 

int wh(x, y) 
int X, y ； 

{ 

return(x*num_data+y) ； 



